Создать массив a из десяти целых чисел, принадлежащих промежутку [-50; 50). вывести полученный массив на экран

Рамина1111111 Рамина1111111    3   05.06.2019 11:10    10

Ответы
Dgj8 Dgj8  05.07.2020 22:56
Var   A:array[1..10] of integer;
  i: integer;
begin
randomize;
for i:=1 to 10 do begin 
A[i]:=(random(101)-50);
 writeln (A[i]);
 end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика