Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Составьте программу, определяющую, является ли целое положительное число трехзначным. (8класс)

Ответ оставил Гость

Var A:integer;
Begin
WriteLn(Введи число);
Read(A);
if (A>99)and(A<1000) then Write(Число трёхзначное)
else Write(Число НЕ трёхзначное)
End.