Составьте программу,определяющую,является ли целое положительное число трехзначным? Тема:Простые и составные условия.Команда ветвления.
If ((a div 1000) < 10) and ((a div 1000) > 0) then writeln('Число трехзначное') Главная часть, надеюсь begin, end и readln(a) напишите сами. div - дает число с отброшенным остатком. Можете использовать mod - он дает чисто остаток без числа
Благодарю,не думал что сайт так быстро действует.Буду советовать друзьям! :)