Глеб любитель стрелять из рогатки.7 раз попадал в полицию. N-число попаданий в...

Question

Глеб любитель стрелять из рогатки.7 раз попадал в полицию. N-число попаданий в полицию.Определить результат N=4,6,7-полиция возмещала ущерб(разбитое стекло)
N=2,5,4-ущерб возмещал папа Глеба
N=1,3-стекло не разбилось

Answer 1

Var n: integer;
begin
write('Введите N <= 7 - число попаданий в полицию: ');<br>readln(n);
case n of
6,7:    writeln('Полиция возмещала ущерб(разбитое стекло)');
2,4,5: writeln('Ущерб возмещал папа Глеба');
1,3:    writeln('Стекло не разбилось');
end;
end. 

Comments

В условии ошибка. N = 4 используется в двух событиях. Убрал на всякий случай одну 4-ку (из первого события), при желании можно сменить её на второе событие.

---

спасибо большое)