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

Question

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

Comments

Не понятное второе условие в команде ветвления

Answer 1

Program f1;
var x,y: real;
begin
readln(x);
if x<=0 then y:=0  else второе условие;<br>writeln( y:3:0);
end.