Ответы на вопрос:
Var k: char; begin write('введите категорию (a,b,c,d,m): '); readln(k); case k of 'a': writeln('мотоциклы'); 'b': writeln('легковые автомобили'); 'c': writeln('грузовые автомобили'); 'd': writeln('автобусы'); 'm': writeln('мопеды'); else writeln('такой категории нет'); end; end. пример: введите категорию (a,b,c,d,m): c грузовые автомобили
Популярно: Информатика
-
yaantonio1916.04.2020 13:58
-
vika082026.05.2021 10:03
-
fire3115.12.2022 00:19
-
TimurA119.03.2021 20:21
-
milaboit05.02.2023 17:38
-
doschanov01.03.2020 23:01
-
NotSmartBoy15.03.2020 19:29
-
andrejpuzanov9014.05.2021 21:06
-
valityuk24.04.2020 00:59
-
Tatyana2341124.09.2022 19:23