- 12.10.2017 11:03
- Информатика
- remove_red_eye 5409
- thumb_up 28
Ответы и объяснения 2
Var m : array[1..5,1..5] of Integer;
i,j : Byte;
Begin
Randomize;
For i:=1 to 5 do
Begin
For j:=1 to 5 do
Begin
m[i,j]:=Random(91)+10;
Write(m[i,j]:4);
end;
Writeln;
end;
end.
- 13.10.2017 15:20
- thumb_up 20
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
var a:=MatrixRandom(5,5,10,100);
Writeln(a)
end.
Тестовое решение:
[[26,15,69,59,40],[27,62,65,49,63],[99,80,37,44,40],[54,95,35,19,70],[45,31,28,88,68]]
- 14.10.2017 20:34
- thumb_up 21
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.