Напишите программу,которая для последовательности натуральных чисел выводит сумму всех...

0 голосов
83 просмотров

Напишите программу,которая для последовательности натуральных чисел выводит сумму всех входящих в последовательность чисел,кратных 3 и при этом меньших 150.Программа получает на вход количество чисел в последовательности,а затем сами числа. Количество чисел не превышает 100.Введённые числа не превышают 300. Программа должна вывести одно число-сумму вех входящих в последовательность чисел,кратных 3 и при этом меньших 150. Входные данные: 3 33 6 270 выходные данные 42


спросил от (12 баллов) в категории Информатика
оставил комментарий от Отличник (7.8k баллов)

какой язык?

1 Ответ

0 голосов
ответил от (66 баллов)

var a,i,k,sum:integer;

begin

read(a);

for i:=1 to a do begin

read(k);

if(k mod 3 =0)and(k

end;

write(sum);

end.

...