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*
Комментарий*

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

alfaantonk
сергей1246
natkul22
Dmitrii836
deputy810
zubareva23338
SaraevaTretyakov1941
nadjasokolova2017
irinakiral
edvard-b
Natalya
info40
Valeria123864531
Банова_Елена431
Yevsyukov1697