Question

Buna ajutatima va rog mult .Ce va afisa programul urmato?
Program test:
Var a,b:integer:
Procedure max (c,d:real :var l:real):
Begin
if c>=d then l:=c else l: =d:
end:
begin
a:=1: b:=2 : max (a,b,a ):writeln (a): writeln (b): end.

a) 1:2 b)2:2 c) 2:1
b) nici un raspuns anterior nu este corect.

Answer 1

b) nici un raspuns anterior nu e corect

Var a,b:integer: - aici ai variabila a declarata ca integer
 max (c,d:real :var l:real): - aici ai paramaterul formal declarat ca real
si aici  - max (a,b,a ) - incerci sa-i atribui lui l care e real variabila a care e integer

programul nu se va compila