Вопрос школьника по предмету Информатика
Составьте программу(Паскаль) для определения количества цифр в записи произвольного натурального числа. Сейчас проходим 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.
Похожие вопросы от пользователей
Сомневаться+ени+е = сомнение
делать + о =дело
задание:
труд= трудиться, дремота = дремать…
А)первые Олимпийские игры
Б)марафонская битва
В)введение платы за исполнение выборных должностей в Афинах
Г)отмена долгового рабства в Афинах
Д)битва при Гавгамелах
ДАЮ 30 баллов
а) центр Западной-Сибирской равнины
б) Прикаспийская низменность
в) центр Среднесибирского плоскогорья
г) Ставропольская возвышенность
д) юг Среднерусской возвышенности
е) юг Дальнего Востока