В задании не сказано, откуда берутся исходные данные, поэтому будем вводить их с клавиатуры. Сначала ведем общее количество данных (не факт, что данные за месяц снимались строго ежедневно), а затем сами данные. Это позволит заодно осуществить контроль ввода.
var n,s,t,i:integer; begin Write('Укажите количество данных: '); Read(n); Writeln('Теперь вводите данные'); s:=0; for i:=1 to n do begin Read(t); s:=s+t end; Writeln('Средняя температура за месяц составила ',s/n:0:1) end.
Пример решения
Укажите количество данных: 11 Теперь вводите данные 27 29 26 31 24 23 27 30 31 28 25 Средняя температура за месяц составила 27.4
var
n,s,t,i:integer;
begin
Write('Укажите количество данных: ');
Read(n);
Writeln('Теперь вводите данные');
s:=0;
for i:=1 to n do
begin
Read(t);
s:=s+t
end;
Writeln('Средняя температура за месяц составила ',s/n:0:1)
end.
Пример решения
Укажите количество данных: 11
Теперь вводите данные
27 29 26 31 24 23 27 30 31 28 25
Средняя температура за месяц составила 27.4
Маша не говорит по-французски (она не играет на скрипке). Она же не знает итальянского. Т. е. она знает либо английский, либо немецкий.
Оля - виалончелистка - не знает итальянского, английского и французского - т. е. говорит на немецком.
Лена не играет на арфе, но, т. к. рояль и виалончель уже заняты, то играть она может только на скрипке, и говорит она по-французски.
Соответственно Валя играет на арфе и говорит по-итальянски. А Маша говорит по-английски.
Итого:
Маша - Рояль, Английский
Оля - Виалончель, Немецкий
Лена - Скрипка, Французский
Валя - Арфа, Итальянский