с помощью генератора случайных чисел на интервале (0,100) получите целочисленный массив, состоящий из 25 элементов"
Answers & Comments
TheMakerXProgram posled;Var a: array[1..100] of integer; i, n: integer;Begin Write (‘Сколько элементов? ’); Readln (n); For i=1 to n do begin a[i]:= Random(58)-23; writeln (a[i],’ ‘); end;End.
Answers & Comments
i, n: integer;Begin Write (‘Сколько элементов? ’);
Readln (n);
For i=1 to n do
begin
a[i]:= Random(58)-23;
writeln (a[i],’ ‘);
end;End.