помогите,пожалуйста. Пользователь может ввести однозначное,двухзначное или трехзначное число. Написать программу,вычисляющую,сколько цифр во введенном числе
Замечание: предполагается, что вводится неотрицательное число. var a:integer; BEGIN write('Введите число: '); readln(a); write('Количество цифр в числе: '); if a<10 then writeln(1) else if a<100 then writeln(2) else writeln(3); END.
Пример: Введите число: 52 Количество цифр в числе: 2
Answers & Comments
Verified answer
Замечание: предполагается, что вводится неотрицательное число.var a:integer;
BEGIN
write('Введите число: ');
readln(a);
write('Количество цифр в числе: ');
if a<10 then writeln(1)
else if a<100 then writeln(2)
else writeln(3);
END.
Пример:
Введите число: 52
Количество цифр в числе: 2