Составьте программу, которая формирует массив из 10 случайных целых чисел в диапазоне от 1 до 20 и выводит на экран элементы, значения которых больше 5, но меньше 15.

Это паскаль.

Question

Информатика

Ипатий

24 декабря, 16:41

Составьте программу, которая формирует массив из 10 случайных целых чисел в диапазоне от 1 до 20 и выводит на экран элементы, значения которых больше 5, но меньше 15.

Это паскаль.

+3

Ответы (1)

Знаете ответ на вопрос?

Ксюта · Answer 1

Var a, i:integer;

m:array[1 ... 10] of integer;

begin

a:=10;

randomize;

for i:=1 to a do

begin

m[i]:=random (21) ;

end;

for i:=1 to a do

if (m[i]>5) and (m[i]<15) then

writeln (m[i]) ;

end.