Вопрос по математике:
Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3.
Количество чисел не превышает 100. Введённые числа не превышают 300.
Программа должна вывести одно число − сумму чисел, кратных 3.
- 10.01.2023 21:01
- Математика
- remove_red_eye 207
- thumb_up 6
Ответы и объяснения 1
Ответ:
var n,i,a,s: integer;
begin
write('Введите количество чисел в последовательности: ');
readln(n);
for i := 1 to n do
begin
write('Введите число: ');
readln(a);
if a mod 3 = 0 then s:=s+a;
end;
writeln('Сумма чисел, кратных 3, равна: ',s)
end.
- 11.01.2023 06:41
- thumb_up 0
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Математика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Математика — наука о структурах, порядке и отношениях, исторически сложившаяся на основе операций подсчёта, измерения и описания формы объектов.