Заполните массив 20 случайными целыми числами из промежутка [1;10] выведите на экран элементы массива через запятую

mashashhukina mashashhukina    2   09.12.2021 10:31    3

Ответы
milena20181 milena20181  27.01.2022 22:00

Код:

program znaniya;

var

 i : integer;

 a : array[0..19] of integer;

begin

 for i:=0 to 19 do begin

   a[i] := random(1,10);

 end;

 writeln(a)

end.

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