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

Составьте программу определяющую является ли введённое число введённое с клавиатуры двухзначным
пример ввода
68
ответ
да
скажите плизззз

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

Var A:integer;
Begin
WriteLn(Введи число);
ReadLn(A);
if (A>9)and(A<100) then Write(Да)
else WriteLn(Нет)
End.

Var
A:integer;
Begin
WriteLn(Введи число);
ReadLn(A);
if A>9 then Begin
 if A<100 then WriteLn(Да)
 else WriteLn(Нет)
 End
else WriteLn(Нет)
End.