Question

Alege raspunsul corect:
Se da urmatorul program:
program Pr_1;
var a,b:integer;
procedure produs(c:integer;var d:integer);
begin
c:=sqr(c); d:=d*c;
end;
begin
a:=2;b:=1;produs(a,b);
write(a,b);
produs(a,b);
write(b,a);
end.

Programul va afisa:
1)44644
2)24216
3)24162
4)nici un raspuns nu este corect

Se da urmatorul program:
program Pr_2;
var a,b:integer;
procedure suma;
var a:Integer;
begin
a:=a+b;
end;
begin
a:=1;
b:=2;
suma;
write(a);
write(b);
end.

Programul va afisa:
1)3
2
2)1
2
3)nici un rezultat nu este corect
4)programul are erori.

Answer 1

la prima problema este 4) nici un raspuns nu este corect deoarece trebuie sa afiseze 24418 iar acesta nu apare in ariante iar la a doua 4)programul are erori.(procedure suma;) nu e bine scris antetul procedurei

Answer 2

1: 4) (trebuia sa fie 24418) 2: 4) (da errori pt ca nu sunt puse indicatiile bine)