Регистрация
Иван54654
14.01.2022 07:22
Информатика
Есть ответ 👍

Дано x - целое, шестиразрядное число. посчитать количество цифр в этом числе больше 5. делать в паскале

288
482
Посмотреть ответы 2

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

deulinslava26
deulinslava26
4,6(33 оценок)
Program ff; var x, counter: integer; begin write('введите число: '); readln(x); while x > 0 do begin   if (x mod 10) > 5 then counter: =counter+1;   x : = x div 10; end; writeln('цифр больше 5: 'counter); readln(); end.
sanzik2005
sanzik2005
4,6(91 оценок)
Использовать робот алг  цел а нач нц для а от 1 до 4     закрасить     вниз кц вправо вверх нц для а от 1 до 4     закрасить     вверх кц кон

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