Ответы
Ответ дал:
0
var
A: array [1..20] of integer;
i: byte;
begin
randomize;
for i := 1 to 20 do
A[i] := random(101)-50;
for i := 1 to 20 do
writeln(A[i]);
end.
A: array [1..20] of integer;
i: byte;
begin
randomize;
for i := 1 to 20 do
A[i] := random(101)-50;
for i := 1 to 20 do
writeln(A[i]);
end.
Приложения:
![](https://st.uroker.com/files/92c/92c9a485aae7c6da77246c8b458257bd.png)
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад