Помогите пожалуйста.В небоскребе N этажей и всего один подъезд: ** каждом этаже 3...

Question

Помогите пожалуйста.

В небоскребе N этажей и всего один подъезд: на каждом этаже 3 квартиры; лифт может останавливаться только на нечетных этажах. Человек садится в лифт и наби-рает номер нужной ему квартиры М. На какой этаж должен доставить лифт пассажира?

Answer 1

Const N = 10;
var a, k, e: integer;
begin
     readln(a);
     if (a > N) then
        writeln('Error')
     else
     begin
          while (k < a) do
          begin
               k := k + 3;
               e := e + 1;
          end;
          writeln(e);
     end;
end.

Вот и лифт =)