Question

Составить схему и программу. 1 номера

Answer 1

Program n1;
var x,y: real;
begin
readln(x);
if x<1 then y:=2*x+3
else y:=4*x+5;
writeln(y);
end.