Question

В небоскрёбе n этажей и 1 подъезд,на каждом этаже по 3 квартиры,лифт останавливается только на не чётных этажах .Человек садится в лифт и нажимает номер нужной ему квартиры.На какой этаж дома довезёт лифт человека.(в паскале) плиззз помогите срочно надо

Answer 1

Const
    flats_per_floor = 3;

var
    n, flat, floor: Integer;

begin
    Write('n = ');
    ReadLn(n);
    WriteLn('Какой номер квартиры нужен человеку?');
    ReadLn(flat);
    
    floor := (flat - 1) div flats_per_floor + 1;
    if (floor > n) or (flat <= 0) then begin
        writeln('Неверный номер квартиры');
        exit;
    end;
    
    if (floor mod 2 = 1) then
        writeln('Едем на ', floor, ' этаж')
    else
        writeln('Едем на ', floor - 1, ' этаж');
end.