
Yoshimitsu
6 год назад
ДАМ 20 поинтов, Составить программу, которая формирует одномерный массив случайными числами от - 100 до 100 и выводит его на экран
ОТВЕТЫ

Елизавета
Oct 24, 2020
Var
A:array[1..33] of integer;
i:integer;
Begin
For i:= 1 to 33 do
Begin
A[i]:=random(201)-100;
Write(A[i],' ');
End;
End.
A:array[1..33] of integer;
i:integer;
Begin
For i:= 1 to 33 do
Begin
A[i]:=random(201)-100;
Write(A[i],' ');
End;
End.
71
Смежные вопросы: