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

Question

Информатика

Констанция

29 августа, 17:16

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

+1

Ответы (1)

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

Захарыч · Answer 1

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

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

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

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