Question

Упражнение 6 Пожалуйста

Answer 1

Program Pogodauses crt;const n=7;var sr:real;i:integer;a:array[1..n] of integer;beginclrscr;sr:=0;writeln('Укажите температуру за день ');for i:=1 to n do begin    readln(a[i]);    sr:=sr+a[i];end;sr:=sr/7;write('Средняя температура = ',sr:0:2);readkey;end.

Answer 2

А можешь оформить как на компъютере

Answer 3

как на компъторе

Answer 4

Тема вывод массива