it gives me an error and the code is:
var a,b,c:integer;
begin
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
if a>b then
begin
if a>c then
writeln('a=',a)
else
writeln('c=',c);
end;
else
begin
if b>c then
writeln('b=',b)
else
writeln('c=',c);
end;
readln;
end.