Составить программу заполнения массива из 7 элементов числами от 1 до 30 с помощью генератора случайных чисел и вывести значения его элементов в строку через запятую

Question

Информатика

Декабрин

20 августа, 11:52

Составить программу заполнения массива из 7 элементов числами от 1 до 30 с помощью генератора случайных чисел и вывести значения его элементов в строку через запятую

+3

Ответы (1)

Знаете ответ?

Фессалоникия · Answer 1

Const n=7;

var a : array[1 ... n] of integer; i : integer;

begin

Randomize;

for i:=1 to n do

begin

a[i]:=random (30) + 1;

write (a[i],',') ;

end;

writeln;

end.