Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Программа в Паскаль. Напишите программу, которая последовательности натуральных чисел определяет количество чисел, оканчивающихся на 6. Программа получает на вход количество чисел последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 6. Введенные числа не превышают 30 000.Программа должна вывести одно число-количество чисел, оканчивающихся на 6.

Ответ оставил Гость

Var k,i,n,a:integer; 
begin 
read(n); 
while iread(a);   
if (a mod 10=6) then k:=k+1;   i:=i+1;   
end;   
writeln(Чисел, оканчивающихся на 6: , k);   
end.