Напишите программу по заполнению массива из 30 ячеек случайными величинами от 40 до 100.

olgaslizova olgaslizova    1   02.04.2019 19:54    1

Ответы
Svetakim0934 Svetakim0934  28.05.2020 12:40

program a;

var

mas: 1..30,

ii: integer;

begin

 for ii := 1 to 30

   mas[ ii ] := 40 + random( 61 );

end.

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