Вклассе n учеников писали проверочную работу по результаты проверочные работы подводились в оценок напишите программу подсчитывающую сколько человек получили пятёрку тройку двойку данные в массив вводится случайным образом в диапазоне от 3 до 5 количество учеников не превышает 30 человек значение элементов массива вывести на экран зарание )
const n = 30;
var a:array[1..n] of integer;
n3,n2,n5,i:integer;
begin
for i:=1 to n do begin
a[i]:=random(2,5);
if a[i]=3 then inc(n3);
if a[i]=2 then inc(n2);
if a[i]=5 then inc(n5);
end;
writeln('3 - ',n3);
writeln('2 - ',n2);
writeln('5 - ',n5);
print(a);
end.