В классе N учеников писали проверочную работу по математике результаты проверочные работы...

Question

В классе N учеников писали проверочную работу по математике результаты проверочные работы подводились в оценок Напишите программу подсчитывающую Сколько человек получили пятёрку тройку двойку данные в массив вводится случайным образом в диапазоне от 3 до 5 количество учеников не превышает 30 человек значение элементов массива вывести на экран
Срочно !!!!!!!!
Спасибо зарание )

Answer 1

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.