Анонимно
Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 3 и оканчивающихся на 4. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3 и оканчивающееся на 4. Количество чисел не превышает 100. Введённые числа по модулю не превышают 300. Программа должна вывести одно число: сумму чисел, кратных 3 и оканчивающихся на 4.
Ответ
Анонимно
var n, s, a,i : integer;
begin
s:= 0;
readln(n);for i:= 1 to n do
begin
readln(a);
if (a mod 3 = 0) and (a mod 10 = 4) then
s:= s + a;
end;writeln(s);
end.
begin
s:= 0;
readln(n);for i:= 1 to n do
begin
readln(a);
if (a mod 3 = 0) and (a mod 10 = 4) then
s:= s + a;
end;writeln(s);
end.
Новые вопросы по Информатике
10 - 11 классы
1 минута назад
5 - 9 классы
2 минуты назад
5 - 9 классы
2 минуты назад
5 - 9 классы
5 минут назад
1 - 4 классы
7 минут назад
Нужен ответ
10 - 11 классы
1 месяц назад
Студенческий
2 месяца назад
Студенческий
2 месяца назад
Студенческий
2 месяца назад
Студенческий
2 месяца назад