Предмет: Информатика, автор: sevcenoartem

Помогите пожалуйста!

Напишите программу на языке паскаль, которая в последовательности натуральных чисел определяет количество чисел, оканчивающихся на 9. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 9.Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30000.

Программа должна вывести одно число: количество чисел, оканчивающихся на 9.

Пример работы программы:


Входные данные Выходные данные

3

19

29 2

24


restIess: язык программирования не забывайте указывать
fsdfsd1974: Нужно срочно делать или есть время?
sevcenoartem: время есть
fsdfsd1974: Можно использовать все? Либо только-то, что вы проходили?
Аноним: если не знаете - молчите и просто списывайте
fsdfsd1974: Что ты написал,не будет работать
fsdfsd1974: В условие (if) 3>19 то (пишется повторное if) хотя должно писаться 'then'
fsdfsd1974: Потом просто набор символов, даже без команды вывода на экран
fsdfsd1974: Нету конца программы
sevcenoartem: сделайте тогда пожалуйста так как вы говорите

Ответы

Автор ответа: Аноним
2

Ответ:

var n,x,k,i:integer;

begin

 readln(n);

 for i:=1 to n do

   begin

   readln(x);

   if x mod 10=9 then

     k:=k+1;

   end;

write('всего чисел которые оканчиваются на 9: ',k);

end.

Объяснение:

Приложения:

fsdfsd1974: Мне кажется, по условию задачи, нужно сделать еще проверку на: (Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30000.)
Аноним: Не надо. Если бы это было надо, то было бы указано что должна в таком случае вывести программа
Похожие вопросы
Предмет: Литература, автор: ЩонаписавІванФранко
Предмет: Математика, автор: Roshounet