Вопрос школьника по предмету Информатика
Составьте программу(Паскаль) для определения количества цифр в записи произвольного натурального числа. Сейчас проходим while, судя по всему его и надо использовать.
Ответ учителя по предмету Информатика
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.
Похожие вопросы от пользователей
Помогиииите
(2х^3y^5)^8 *2x^9y^14/(2x^3y^6)^9
1) f(x)=1/6x^18-0.5x^2-12
2) f(x)=x/3-7/2x^2+10
3)7/x^4-11x^2
4)4x^2-7/x^2
Поясните ответ,пожалуйста