Регистрация
Neymar3110
09.08.2021 04:16
Информатика
Есть ответ 👍

1.дано целое число а. определить количество цифр в числе, которые больше 6.pascal

217
327
Посмотреть ответы 2

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

maratkaa337
maratkaa337
4,6(60 оценок)
Var     a, counter: integer; begin   readln(a);   counter : = 0;   repeat     if (a mod 10 > 6) then       inc(counter);     a : = a div 10;   until (a = 0);   writeln(counter); end.
еклвла838
еклвла838
4,4(44 оценок)

v - значок логического сложения.

а = 0.

а и b = 0

это будет противоречиво, если b = 1.

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