{* Задача 443 *}

Unit ZADACH443;
Interface
Implementation
Begin
 writeln('Введите количество посадочных мест. Напечатайте соответствующий этому количеству вид транспорта: «велосипед», «мотоцикл», «легковой автомобиль», «микроавтобус», «автобус».');
End.

Program zadach443;

Uses zadach443.pas; {* Эту строку можно удалить *}
Var {* Объявление переменных *}
  n : integer;
Begin
  writeln ('Введите количество посадочных мест');
  readln (n);
  Case n Of    1 : writeln ('велосипед');
    2 : writeln ('мотоцикл');
  4 : writeln ('легковой автомобиль');
  18 : writeln ('микроавтобус');
  35 : writeln ('автобус')
  Else writeln ('ошибка');
End;

  End..