Question

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

Answer 1

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