Написать программу находящую количество цифр вводимого неотрицательного…

Question

52

Написать программу находящую количество цифр вводимого неотрицательного положительногочисла

в избранное ссылка

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

lsn21 · Accepted Answer

41

lsn21

06 марта 2023

Var a, c: integer; begin readln (a); c: =0; if (a=0) then c: =1 else while a <> 0 do begin c: =c+1; a: =a div 10; end; writeln (c); end.

комментировать

в избранное ссылка отблагодарить