Напишите программу, которая выведет на экран значение true или false, в за-
висимости от того, является ли введенное число x четырехзначным или нет (паскаль АВС)

Ответ

Автор - fedortarasenko

program tof;

var x,c: integer;

begin

writeln('Enter your number');

readln(x);

if((x>999) and (x<10000)) then

writeln('true')

else

writeln('false');

end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.