Question

Program P110;
var a,b:integer;
function
f(x:integer):integer;
begin
f:-(a+b)*x;
a:-a+1;
b:-b+2;
end;
begin
a:-1;b:-2
writeln(f(1))
writeln(f(1))
writeln(f(1))
end.
Ce va afisa programul?
- liniuta aceasta reprezinta egal
ajutor va rogggg!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Answer 1

corect este asa

da - este de fapt egal

Program P110;
var a,b:integer;
function
f(x:integer):integer;
begin
f:=(a+b)*x;
a:=a+1;
b:=b+2;
end;
begin
a:=1;b:=2;
writeln(f(1));
writeln(f(1));
writeln(f(1));
end.


afiseaza


3

6

9