1) abcegij
2)Z=15;
A=18.
3) 2
4)Var
x,y: Integer;
begin
x:=x+y;
y:=x-y;
x:=x-y;
end.
5) Не указан тип переменной, не стоит точка в самом конце
6) If (x>y) then
write(x);
else:
write(y)
7) Var
x,y: Integer;
begin
readln(x, y);
write(x+y);
end.
8)Var
x,y,z: Integer;
begin
readln(x, y, z);
write(z, y, x);
end.