Вотделе работают 3 сотрудника, которые получают заработную плату в рублях. требуется определить: на сколько зарплата самого высокооплачиваемого из них отличается от самого низкооплачиваемого.
это питон
a,b,c= map(int,
if c> b and b> a:
i=c-a
print(i)
elif b> c and c> a:
i=b-a
print(i)
elif a> c and c> b:
i=a-b
print(i)
elif a> b and b> c:
i=a-c
print(i)
elif b> a and a> c:
i=b-c
print(i)
elif c> b and b
i=c-b
print (i)
мне выходит presentation error (ошибка презентации)
подскажите где ошибка ?
var n,max,min,i:integer;
begin
max:= -1;
min:= 999999;
for i:=1 to 3 do begin
write('введите зарплату ' ,i, ' сотрудника: ');
readln(n);
if(n>max) Then max:=n;
if(n<min) Then min:=n;
end;
write('разница равна ',max-min);
end.