Есть ответ 👍

Найти c
а:= 31
b:= 6
c:= a mod b+b​

175
464
Посмотреть ответы 1

Ответы на вопрос:

filbert04
4,4(47 оценок)

Var   m, n, n10, n100: integer; begin   write('введите трехзначное число: ');   readln(m);   if (m > 99) and (m < 1000) then   begin       n100 : = m div 100;       n10 : = (m mod 100) div 10;       n : = m mod 10;       if (n + n10 + n100) mod 7 = 0 then writeln('сумма цифр кратна семи')       else writeln('сумма цифр не кратна семи')   end end. тестовое решение: введите трехзначное число: 473 сумма цифр кратна семи

Популярно: Информатика