Program z1;
var x, y: integer;
begin
write('введи x '); readln (x);
if x>0 then y:=x-5 else y:=x+10;
writeln ('y=', y);
end.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Program z1;
var x, y: integer;
begin
write('введи x '); readln (x);
if x>0 then y:=x-5 else y:=x+10;
writeln ('y=', y);
end.