В небоскрёбе n этажей и 1 подъезд,на каждом этаже по 3 квартиры,лифт останавливается только на не чётных этажах .Человек садится в лифт и нажимает номер нужной ему квартиры.На какой этаж дома довезёт лифт человека.
какой язык?э
язык? *
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.