1) с клавиатуры введите целое число от 0 до 1000. 2) если число введённое (<0) или (>1000), вывести текст "Ошибка ввода" и конец. 3) если число (<10), вывести текст "Однозначное" если число (<1000) "трехзначное". ! Завтра нужно сдать, что бы в четверти было 4.
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
6 санына сәйкес келетін екілік кодын анықта. Жауабы:
Автор: Viktorovich395
Подскажите, , что означает "неповторящие строки таблицы истинности"?
Автор: afilippov3321
Обоснуйте необходимость существования поисковых служб в интернете
Автор: dilovarnazarov1986
Построить строку, состоящую из заглавных букв русского алфавита (по алфавиту Python
Автор: abdulhakovalily22
Што такое 2д? Эссе по Казакскаму
Автор: maltes
Які існують порядки сортування масиву
Автор: Попов1946
Где хранит данные исполнитель компьютера для решения задач
Автор: amayonova
//Pascal
program number;
var
x : integer;
begin
write('Введите число: ');
readln(x);
if (x < 0) or (x> 1000) then
writeln('Ошибка ввода!')
else
if x < 10 then writeln('Число однозначное')
else if (x > 9) and (x < 100) then writeln('Число двузначное')
else writeln('Число трёхзначное');
end.