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

нужной ему квартиры. На какой этаж дома довезёт лифт человека.

Question

Информатика

Мишура

10 февраля, 19:03

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

нужной ему квартиры. На какой этаж дома довезёт лифт человека.

+1

Ответы (1)

Знаете ответ на вопрос?

Всеслав · Answer 1

Var a, c:integer;

begin

writeln ('введите номер квартиры') ;

readln (a) ;

if ((a mod 3) 0) then c: = (a div 3) + 1;

if ((a mod 3) = 0) then c: = (a div 3) ;

if (c mod 2 0) then c:=c+1;

writeln ('этаж на который привезёт человека ', c) ;

end.