с автостанции автобусы отправляются по 16 маршрутам и переезжают через реку по 4-м мостам: 1,2,3,5 - по южному, 4,6,7,8 - по центральному, 9,10,11, 12 - по северному, 13,14,15, 16 - по окружному. ввести с клавиатуры номер маршрута. определить, по какому мосту он пойдет.
Паскаль ABC.Net
Program Z;
var x:integer;
BEGIN
write('Задайте номер маршрута: ');
read(x);
if ((x>=1) and (x<=3)) or (x=5) then write('Автобус поедет по Южному мосту');
if ((x>=6) and (x<=8)) or (x=4) then write('Автобус поедет по Центральному мосту');
if (x>=9) and (x<=12) then write('Автобус поедет по Северному мосту');
if (x>=13) and (x<=16) then write('Автобус поедет по Окружному мосту');
END.
Объяснение: