Напишите программу которая получает число от 1 до 1000 и определяет, однозначное, двузначное, трехзначное или четырехзначное это число

Напишите программу которая получает число от 1 до 1000 и определяет, однозначное, двузначное, трехзначное или четырехзначное это число
Гость
Ответ(ы) на вопрос:
Гость
Program n1; var a: integer; begin readln(a); case a of 1..9: write('однозначное'); 10..99: write('двузначное'); 100..999: write('трехзначное'); 1000: write('четырехзначное') else write('ошибка'); end; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы