Дано натуральное число n(n<=100). Сколько цифр в числе n.
-------------------------------------------------------------
Код:
var
a:integer;
begin
readln(a);
if a<=10 then
wtiteln(a)
else
if a <= 100
then
writeln(a div 10)
else
writeln('1');
readln{;}
end.
Admin: Пользуемся тегами!
Правильно ли я решил пример или нет? Если нет, то напишите его правильно пожалуста. Заранее всем спасибо за помощь.