Брежний
03.04.2020 18:27

Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, оканчивающихся на 3. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, оканчивающееся на 3. количество чисел не превышает 100. введённые числа не превышают 300. программа должна вывести одно число – сумму чисел, оканчивающихся на 3.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
лёха562
01.10.2020 05:52

Program n1;
Uses CRT;
Var s,i: integer;
begin
ClrScr;
Repeat
readln(i);
If (i mod 3=0)or(i mod 100=0) then s:=s+i;
until i=0;
writeln('Сумма =',s);
readln
end.

0,0(0 оценок)
Ответ:
оуовлвдсл
01.10.2020 05:52

-Program n1;
-Uses CRT;
-Var s,i: integer;
-begin
-ClrScr;
-Repeat
-readln(i);
-If (i mod 3=0)or(i mod 100=0) then s:=s+i;
-until i=0;
-writeln('Сумма =',s);
-readln
-end.

Этой пойдёт в паскале 

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота