Задание:
Составить программу случайного выбора трех дисциплин, по которым придется сдавать экзаме-ны, из предлагаемых на выбор четырех (всего возможно 4 вариантавыбора).
Решение:
vard1,d2,d3,d4: string; beginrandomize; readln (d1); readln (d2); readln (d3); readln (d4); case random (4) of0: writeln (d1,d2,d3); 1: writeln (d1,d2,d4); 2: writeln (d2,d3,d4); 3: writeln (d1,d3,d4); end; end.
Знаете другой ответ?