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

Question

Информатика

Петряня

17 апреля, 15:11

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

+2

Ответы (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