стоимость проезда на пригородном поезде составляет 3 рубля за одну зону.нумерация зон ведется начиная с городского вокзала(1 зона).
составить программу которая бы определяла стоимость проезда в один конец между станциями расположенными в разных зонах.
номер зоны вкоторой находится станция отправления и той зоны в которой рамположена конечная станция вводятся в компьютер с клавиатуры .
при составлении программы следует учесть что пассажир может отправляться как из пригорода в город так и наоборот.

Пипец ничего не понимаю (IMG:style_emoticons/default/sad.gif) Помогите пожалуйста

program cena;
uses crt;
var n1, n2, price: integer;
Begin
clrscr;
repeat
price:=0;
repeat
write('Введите номер зоны отправления');
readln(n1);
write('Введите номер зоны прибытия');
readln(n2);
price:=3*(abs(n2-n1)+1);
end;
writeln;
writeln(price);
End.