Форум «Всё о Паскале» _ Задачи _ чтение из файла, помогите пожалуйста
Автор: 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