Проверка числа на двузначность на Pascal
Проверка числа на двузначность...
var x: integer;
begin
write('Введите x: ');
readln(x);
if (x>=10) and (x<=100) then
writeln('Двузначное число')
else writeln('Не двузначное число')
end.



10.02.2015, 08:59 -
Категория: Статьи » Программирование » Pascal