Напишите программу, которая определяет, верно ли, что введённое число -– трёхзначное
Ввод(i) i = i / 1000 Если (i > -1 И i < 1) То Вывод("Число 3-х значное") КонецЕсли