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

program Test;var i, amountOfNumbers, sum, number: integer;begin     write('Введите количество чисел: ');     readln(amountOfNumbers);       writeln('Введите числа:');    sum := 0;   for i := 0 to amountOfNumbers - 1 do     begin          read(number);              if number mod 10 = 2 then         sum := sum + number;    end;       writeln('Сумма: ', sum);end.