1
2
3
4
5
6
7
8
9
10
11
12
var a,b,c:integer;
function max(a,b:integer):integer;
begin
if a>=b then max:=a
else max:=b;
end;
a:=1;b:=2; c:=3;
writeln(max(a,max(b,c)));
end.
Объяснение:
незнаю наверное правильно
1
2
3
4
5
6
7
8
9
10
11
12
var a,b,c:integer;
function max(a,b:integer):integer;
begin
if a>=b then max:=a
else max:=b;
end;
begin
a:=1;b:=2; c:=3;
writeln(max(a,max(b,c)));
end.
Объяснение:
незнаю наверное правильно