Дан массив из n элементов Определить сколько в нем двузначных элементов кратных 5.

Question

Информатика

Лавр

24 июля, 14:15

Дан массив из n элементов Определить сколько в нем двузначных элементов кратных 5.

+5

Ответы (2)

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

Мстислава · Answer 1

Program gt;

var n, a, p, k, q, i:integer;

begin

read (n) ;

q:=0;

for i:=1 to n do

begin

read (A) ;

p:=a;

if (a mod 5=0) then begin

k:=0;

while a>0 do

begin

a:=a div 10;

k:=k+1;

end;

if (k=2) then q:=q+1;

end;

end;

writeln (q) ;

end.

Катюля · Answer 2

На Паскале:

k:=0;

for i:=1 to n do

if (array[i] 9) and (array[i] mod 5 = 0) then k: = k+1;