заполнить массив из 10 элементов случайными числами в интервале -10 10
Ответы на вопрос
Ответил lllu3oFpeniya
0
var
a:integer;
z:array [1..10] of integer;
begin
write('Элементы цикла(10): ');
for a:=1 to 10 do
begin
z[a]:=random(21)-10;
write(z[a],', ');
end;
end.
Новые вопросы