Напишите программу, которая в последовательности целых чисел определяет количество двухзначных чисел кратных 5​

Есть ответ
12.12.2022
239

Ответ


Ответ:
var a,k: integer;

begin

a:=1;

k:=0;

while (a0) do  
begin

readln(a);

if ((a9) and (a mod 5 =0)) then k:=k+1;

end;

writeln(k);

end.
Объяснение:



Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
12.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.