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

Это паскаль.

Question

Информатика

Кастрихий

4 сентября, 18:10

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

Это паскаль.

+2

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