Напишите программу , которая определяет , верно ли , что введенное число трехзначное.!!!!!!!!!!!!!!!!!!!!!!!!
Var a:integer; begin read(a); if (a>99) and (a<1000) then write('YES') else write('NO');<br>end.