Question

ПРОШУ ЭТО ОЧЕНЬ СРОЧНО

Answer 1

s:=0;
j:=0;
for i:=1 to N do s:=s+a[i];
s:=s/N;
for i:=1 to N do
  if a[i]>s then j:=j+1;
writeln(j)

Answer 2

Синтаксическая ошибка в операторе If

Answer 3

возможно, я в паскале не силен

Answer 4

Спец по С++? ))))

Answer 5

в основном Python, но и с/с++ еще не весь забыл

Answer 6

спасибо... если бы раньше

Answer 7

const
  N = 30;
var
  a: array[1..N] of integer;
  i, j: integer;
  s: real;
begin
  for i := 1 to N do readln(a[i]);
  s := 0;
  for i := 1 to N do s := s + a[i];
  s := s / N;
  writeln('Результаты:');
  j:=0;
  for i := 1 to N do
    if a[i] > s then j=j+1;
  writeln(j)
end.

Answer 8

спасибо, было бы круто, если бы пораньше