86

Напишите программу на языке Паскаль для нахождение количества цифр в записи…

07 марта 2023

Напишите программу на языке Паскаль для нахождение количества цифр в записи положительного целого числаx.

категория: информатика

58

Program ololo; var a,b: integer; beginread (a); if a=0 then begin write (1); exit; end; while a <> 0 dobegin inc (b); a: =a div 10; end; write (b); end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...