Заполните массив В размерностью 5 элементов положительными и отрицательными целыми числами и выведите его на экран монитора.

Сохраните программу и оправьте на проверку учителю.

Question

Альбинка

12 декабря, 20:33

+2

Ответы (1)

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

Екатеринка · Answer 1

Var b:array[1 ... 5] of integer;

m:integer;

begin;

randomize;

for m:=1 to 5 do

begin;

b[m]:=random (-10,10) ;

writeln (b[m]) ;

end;

end.