Каждое утро майор Знаменский идет в тир и делает пять выстрелов через плечо. Если он набирает 50 очков, то вечером идет с Зиночкой в ресторан, а если меньше, то на тренировку в тир. Написать программу, которая выдает планы майора на вечер.В паскале

//Pascal ABC.NET v3.1 сборка 1219//Как я понял, количество очков случайноVar a,i,s:integer;begin randomize; for i:=1 to 5 do  begin   a:=random(11);   writeln(i,' выстрел -',a);   s:=s+a;  end; writeln('Сумма=',s); if s=50 then writeln('Идет с Зиночкой в ресторан') else writeln('На тренировку в тир');end.Пример работы программы:1 выстрел -32 выстрел -103 выстрел -74 выстрел -85 выстрел -0Сумма=28На тренировку в тир