ВТОРОЙ РАЗ ПРОШУ, ПОМОГИТЕ!!!ПОЖАЛУЙСТА!!!!:(((ОЧЕНЬ НАДО!!:(ПОМОГИТЕЕЕЕЕЕв массиве...

0 голосов
33 просмотров

ВТОРОЙ РАЗ ПРОШУ, ПОМОГИТЕ!!!ПОЖАЛУЙСТА!!!!:(((ОЧЕНЬ НАДО!!:(ПОМОГИТЕЕЕЕЕЕ
в массиве хранится температура воздуха за январь месяц,определить среднюю температуру января и количество дней в январе,когда температура была ниже среднего.


Информатика (84 баллов) | 33 просмотров
0

На паскале АБЦ?

0

спросите,что полегче:D знаю только,что Паскаль и все

Дан 1 ответ
0 голосов

Даже не знаю. Как-то так, наверное.

const n=5;
var a:array[1..n] of real; t:real; i,k:integer;
begin
t:=0; k:=0;
for i:=1 to n do read(a[i]);
for i:=1 to n do t:=t+a[i];
t:=t/n;
for i:=1 to n do if a[i]write(t,' ',k);
end.

(8.5k баллов)
0

огромное спасибо!!!:)