Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
називається вкладеними циклами.
Объяснение:
___
ответ:цикл с предисловием
(если сумма цифр числа делится на 3, то число делится на 3 нацело)
var a, s: integer;
begin
s: =0;
writeln ('введите число');
while a< > 0 do
a: = a mod 10
s: =s+a;
end;
if s mod 3 = 0 then writeln ('делится') else
writeln ('не делится');
end.
есть три цифры 1,2,3 которые могут стоять на 4-х местах
например 1111 каждую цифру можно использовать повторно
значит всего получится 3*3*3*3=81 число
Популярные вопросы