Question

дан школьный журнал. в нём стоит 25 оценок, от 1 до 5. напишите программу в паскале, что бы она выдавала количество пятёрок. умоляю!!!! очень нужно​

Answer 1

Ответ:

var

 a: array[0..25] of integer;

 i,b: integer;

begin

 for i:= 0 to 25 do

   readln(a[i]);

 for i:= 0 to 25 do

 begin

   if a[i] = 5 then

     b:= b + 1;    

 end;

 writeln('Количество пятерок: ',b);

end.

Объяснение:

вроде так