Помогите перевести с турбо паскаля в паскаль ABC программу

Динара в категроии Информатика, вопрос открыт 02.02.2018 в 23:56

var A , B, minA , maxA , minB, maxB, minn, maxx, t, t1 , i :longer;
begin
readln ;readln;
minA:= *50+1;maxA:=A*50;
minB:=*70+1;maxB:=B*70
ifmaxB>ormaxA> then writeln<-1>else
begin
if minA if maxA>maxB then maxx:=maxb else maxx:=maxxA;
t:= min div 60;
t1:=max div 60;
if<>0 then inc;
if<>0 then inc;
for i:=t to t1 do
write ;
writeln;
end;
end.