Вопрос школьника по предмету Информатика
Составьте программу(Паскаль) для определения количества цифр в записи произвольного натурального числа. Сейчас проходим 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 Решите уравнение х:3,57+12,32=21,23
3 скорость лодки при движении по течению реки равна 18,4км/ч, а против течения — 16,4 км/ч. Сколько километров пройдет лодка за 4 часа двигаясь по озеру?
4 Как изменится произведение двух десятичных дробей если в одном множителе перенести запятую на две цифры в лево а в другом на три цифры в право ?