Составить линейную программу, печатающую значение true, если указанное высказывание является истинным, и false - в противном случае: Введенное целое число Y является отрицательным

Tyrbo paskal

Question

Толя

10 июля, 04:15

+1

Ответы (1)

Знаете ответ на вопрос?

Утарид · Answer 1

var

Y: integer;

begin

Write ('Y = ') ;

Readln (Y) ;

Write ('Введенное целое число ', Y,' является отрицательным - ', Y < 0) ;

Readln

end.