Составить алг для нахождения среднего арифметического нечетных двузначных чисел в паскале

Question

Информатика

Марьина

8 февраля, 07:45

Составить алг для нахождения среднего арифметического нечетных двузначных чисел в паскале

+1

Ответы (1)

Знаете ответ на вопрос?

Матфий · Answer 1

Var z : array[1 ... 100] of longint; a, b, c, d:longint;

Begin

Read (a) ;

For i : = 1 to n do read (a[i]) ;

For i : = 1 to n do begin

B:=b+a[i]; c:=c+1;

End;

D : = b:c

Writeln (d) ;

End