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

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

Question

Эмиля

28 июня, 12:50

+4

Ответы (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.