Напишите программу, которая в последовательности - вопрос №11593484 от VladSolo 10.05.2020 18:59

Question

Информатика: Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, оканчивающихся на 3 или кратных 5. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 3 или кратное 5. Количество чисел не превышает 1000. Введенные числа не превышают 30 000. Программа должна вывести одно число - сумму чисел последовательности, оканчиваю- щихся на 3 или кратных 5. Пример работы программы: Входные

VladSolo · Answer

var x, i, n, s:integer;BeginRead(n);FOR i:=1 to n dobeginRead (x);IF (x mod 10=3) or (x mod 5=0) then s:=s+x;end;write(s);end....