Составьте программу определяющие является ли целое положительное число трёх значный

Question

Информатика

Констанция

21 июня, 06:37

Составьте программу определяющие является ли целое положительное число трёх значный

+2

Ответы (1)

Знаете ответ?

Захарыч · Answer 1

Если я правильно понял вопрос:

uses crt; Var a:integer; Beginread (a) ;

if (a>99) and (a<1000) then writeln ('трехзначное')

else writeln ('не трехзначное') ; End.