Паскаль.

Определить, сколько элементов массива меньше, чем число 6.

Question

Информатика

Максимка

16 мая, 22:23

Паскаль.

Определить, сколько элементов массива меньше, чем число 6.

+5

Ответы (1)

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

Лодя · Answer 1

var a:array [1 ... 100] of integer;

i, c, n: integer;

begin

randomize;

readln (n) ;

c:=0;

for i:=1 to 10 do begin

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

if (a[i]<6) then c:=c+1;

end;

writeln (c) ;

end.

Паскаль.Определить, сколько элементов массива меньше, чем число 6.

Паскаль.

Определить, сколько элементов массива меньше, чем число 6.