Составьте программу определяющую является ли введённое с клавиатуры целое число двухзначным"
Var
A:integer;
Begin
Write(A);Read(A);
if (A>9)and(A<100) then Write(А - двузначное)
else Write(А - не двузначное)
End.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var
A:integer;
Begin
Write(A);Read(A);
if (A>9)and(A<100) then Write(А - двузначное)
else Write(А - не двузначное)
End.