C(10) заполнитт стучайным оюрпзлм (100) вывести построчно​

Ьрнрг Ьрнрг    3   07.10.2019 09:58    0

Ответы
qwertzloygoblinqwert qwertzloygoblinqwert  10.10.2020 01:20

program Random10;

var

 C: array [1..10] of Integer;

 i: Integer;

begin

 Randomize;

 for i := Low (C) to High (C) do

   C [i] := Random (101);

 Write ('Массив: ');

 for i := Low (C) to High (C) do

   Write (C [i], ' ');

 ReadLn;

end.

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