Question

Написать программу, которая проверяет число на двузначность Паскаль

Answer 1

Program art;
var 
 a: integer;
begin 
 writeln('Введите число:'); 
 readln(a); 
 if (a>=10) and (a<=99) then writeln('Число двузначное') 
  else writeln('Число не является двузначным')
end.

Answer 2

Для проверки, является ли число двузначным в языке Pascal, можно написать следующую программу:

program CheckTwoDigitNumber;
var
  number: integer;
begin
  writeln('Введите число:');
  readln(number);
  
  if (number >= 10) and (number <= 99) then
    writeln('Число является двузначным.')
  else
    writeln('Число не является двузначным.');
end.

В этой программе мы сначала запрашиваем у пользователя ввод числа. Затем мы проверяем, находится ли введенное число в диапазоне от 10 до 99. Если это условие выполняется, то выводится сообщение "Число является двузначным". В противном случае выводится сообщение "Число не является двузначным".

Надеюсь, это поможет! Если у вас возникнут еще вопросы, не стесняйтесь задавать.