составить программы заполнения одномерного массива случайными числами от 1 до 100 и вывести его на экран компьютера
Ответы
Ответ дал:
0
Ответ:
Program Pl_9_1;
uses crt;
Type Mas=array[1..10] of integer;
Var A:Mas;
i:integer;
Begin
Clrscr;
For i:=1 to 10 do begin
A[i]:=random(100)-0;
Writeln(A[i]);
end;
end.
Объяснение:
Вас заинтересует
2 месяца назад
2 месяца назад
3 месяца назад
3 месяца назад
1 год назад
1 год назад
7 лет назад