videofanovitch
?>

Решение задачи на языке pascal

Информатика

Ответы

ЮлияНиколаевна1748

Program trexznach;

var l:integer;

begin

Writeln(Введите любое число);

readln(l);

if (l>=100) and (l<1000) then

Begin

Writeln(Число является трехзначным);

end

else writeln(Число не является трехзначным);

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Решение задачи на языке pascal
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Coverplus30
aleksey7800
РобертИрина
eisakov86
AkimovaI1608
misstimarina2016
Викторович Попков
info2
Голосова-Лобанов1555
annaar497
expozition
afilippov3321
Александр1991
Aleksei1968
uglichwatch