Глеб любитель стрелять из рогатки.7 раз попадал в полицию. N-число попаданий в полицию.Определить результат N=4,6,7-полиция возмещала ущерб(разбитое стекло) N=2,5,4-ущерб возмещал папа Глеба N=1,3-стекло не разбилось
Answers & Comments
Royal21
Var n: integer; begin write('Введите N <= 7 - число попаданий в полицию: '); readln(n); case n of 6,7: writeln('Полиция возмещала ущерб(разбитое стекло)'); 2,4,5: writeln('Ущерб возмещал папа Глеба'); 1,3: writeln('Стекло не разбилось'); end; end.
1 votes Thanks 2
Royal21
В условии ошибка. N = 4 используется в двух событиях. Убрал на всякий случай одну 4-ку (из первого события), при желании можно сменить её на второе событие.
Answers & Comments
begin
write('Введите N <= 7 - число попаданий в полицию: ');
readln(n);
case n of
6,7: writeln('Полиция возмещала ущерб(разбитое стекло)');
2,4,5: writeln('Ущерб возмещал папа Глеба');
1,3: writeln('Стекло не разбилось');
end;
end.