Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ чтение из файла, помогите пожалуйста

Автор: grannos 28.04.2005 3:17

Вот code небольшой проги для создания матрицы в виде латинского квадрата заданного размера:


program lat_kv;
uses crt;
var
a:array [1..100,1..100] of integer;
i,j,n,c:integer;
begin
clrscr;
write ('Vvedite razmer ');
readln(n);
for i:=1 to n do
for j:=1 to n do
begin
a[i,j]:=i+j-1;
if a[i,j]>n then a[i,j]:=a[i,j]-n;
end;
for i:=1 to n do
begin
writeln;
for j:=1 to n do write(a[i,j],' ');
end;
readln;
end.


( кто не знает - латинский квадрат, это матрица, в столбцах и строках которой нет повторяющихся чисел)
Может ли кто-нибудь подсказать, как:
1) Организовать процедуру чтения программой вещественных чисел из файла и создание квадрата из них;
2) сделать рандомайз чисел, из которых будет составляться матрица;

Буду очень признателен,если кто сможет помочь.

Автор: volvo 28.04.2005 3:25

Стоп, стоп, стоп....

Цитата(grannos @ 27.04.05 23:17)
( кто не знает - латинский квадрат, это матрица, в столбцах и строках которой нет повторяющихся чисел)
Нет, простите... Ваше определение оставляет неясность... Вот точное определение латинского квадрата. Читайте внимательно:
Цитата
ЛАТИНСКИЙ КВАДРАТ - квадратная таблица n^2 чисел, каждая строка и каждый столбец которой содержат числа 1, 2, ..., n


Цитата(grannos @ 27.04.05 23:17)
Может ли кто-нибудь подсказать, как:
1) Организовать процедуру чтения программой вещественных чисел из файла и создание квадрата из них;

Это как понимать? Латинский квадрат из вещественных чисел? Что за глупость?

Цитата(grannos @ 27.04.05 23:17)
2) сделать рандомайз чисел, из которых будет составляться матрица;

И Random нельзя применять, т.к. должны использоваться только числа 1 .. n

Автор: Altair 28.04.2005 3:41

grannos,
вот http://forum.pascal.net.ru/index.php?showtopic=1405&view=findpost&p=11762

"Организовать процедуру чтения"
http://forum.pascal.net.ru/index.php?showtopic=3584&view=findpost&p=32082