Напишите программу которая в последовательности натуральных чисел определяет суМму всех чисел, кратных 3 и оканчивающихся на 0.Программа получает на вход натуральные числа, количество введеных чисел неизвестно,последовательность чисел заканчивается числом 0 (0-признак окончания ввода,не входит в последовательность)

Мму всех чисел, кратных 3 и оканчивающихся на 0.Программа получает на вход натуральные числа, количество введеных чисел неизвестно,последовательность чисел заканчивается числом 0 (0-признак окончания ввода,не входит в последовательность)

Ответы:
АНИТА ЕВСЕЕНКО
06-09-2018 16:45

Var    n, s: integer;begin    s := 0;    repeat        readln(n);        if n mod 3 = 0 then s := s + n;    until n = 0;    writeln(s)end.

Картинка с текстом вопроса от пользователя Margarita Taranova

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Напишите программу которая в последовательности натуральных чисел определяет су» от пользователя Margarita Taranova в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!