Запиши программу на языке Паскаль для: y = 0, если x≤0

x, если 01. (y:3:0)

Запусти программу и введи значение x=-14.

Question

Костюша

3 марта, 03:26

+2

Ответы (1)

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

Декабрина · Answer 1

Program f1;

var x, y: real;

begin

readln (x) ;

if x<=0 then y:=0 else второе условие;

writeln (y:3:0) ;

end.

Запиши программу на языке Паскаль для: y = 0, если x≤0x, если 01. (y:3:0)Запусти программу и введи значение x=-14.