Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, оканчивающихся на 3. В последовательности всегда имеется число, оканчивающееся на 3. Количество чисел не превышает 10. Введенные числа не превышают 300. Программа должна вывести одно число - сумму чисел, оканчивающихся на 3. (программу проверить на компьютере для чисел: 43 61 35 59 143 243 292 35 33. В тетрадь записать проверенную программу и ответ
На языке паскаль
Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, оканчивающихся на 3. В последовательности всегда имеется число, оканчивающееся на 3. Количество чисел не превышает 10. Введенные числа не превышают 300. Программа должна вывести одно число - сумму чисел, оканчивающихся на 3. (программу проверить на компьютере для чисел: 43 61 35 59 143 243 292 35 33. В тетрадь записать проверенную программу и ответ
На языке паскаль
На языке паскаль
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Интересные статьи из справочника
Поможем написать учебную работу
Отвечай на вопросы, зарабатывай баллы и трать их на призы.
Подробнее
Подробнее
program SumNumsEndingWithThree;
var
num, sum: integer;
begin
sum := 0;
repeat
readln(num);
if num mod 10 = 3 then
sum := sum + num;
until (num mod 10 = 3) and (not eof);
writeln('Сумма чисел, оканчивающихся на 3, равна: ', sum);
end.