Составьте программу(паскаль) для определения количества цифр в записи произвольного натурального числа. сейчас проходим while, судя по всему его и надо использовать.

alena0303 alena0303    3   25.08.2019 17:30    0

Ответы
ffplfref ffplfref  05.10.2020 19:16
Var n,p,k:integer;
begin
readln (n);
p:=n;
while p<> 0 do begin
k:=k+1;
p:=p div 10;
end;
writeln ('k=',k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика