На pascal. по информатике: дана последовательность из 16 чисел(числа вводятся с клавиатуры). подсчитать количество чисел оканчивающихся на шесть.

artik12042003 artik12042003    3   22.07.2019 06:20    0

Ответы
anastasiab200 anastasiab200  03.10.2020 10:20
Var  n, i, count: integer;
begin 
 count := 0; 
for i := 1 to 16 do   begin   
read(n);   
if n mod 10 = 6 then count := count + 1; 
 end; 
writeln(count);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика