Заполнить массив из 10 элементов случайными числами в интервале -10 10

tambovtsevanat tambovtsevanat    3   26.11.2020 19:05    0

Ответы
калина007 калина007  26.12.2020 19:09

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика