Алгоритм разветвления

Question

Алгоритм разветвления. Составить алгоритм, который проверяет, делится ли на три целое число, введенное с клавиатуры (возможно использование оператора mod –остаток от деления двух чисел).

Answer 1

77

bankir-33

22 апреля 2023

(если сумма цифр числа делится на 3, то число делится на 3 нацело) var a, s: integer; begins: =0; writeln ('Введите число'); while a<> 0 dobegina: =a mod 10 S: =s+a; end; if S mod 3=0 then writeln ('делится') elsewriteln ('не делится'); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: