В задании не сказано, откуда берутся исходные данные, поэтому будем вводить их с клавиатуры. Сначала ведем общее количество данных (не факт, что данные за месяц снимались строго ежедневно), а затем сами данные. Это позволит заодно осуществить контроль ввода.
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
import random dwa = [i for i in range(0,15+1)] dwa_new = [] for q in dwa: dwa_new.append(bin(q)) print('Числа в 10 системі:\n',dwa) print('\tПеревод чисел в 2 систему:') print('Числа в 2 системі:\n',dwa_new) gotov = [] mas = [random.choice(dwa_new) for i in range(10)] mas_sredne = [] for zz in mas: mas_sredne.append(int(zz,2)) m = 0 for s in mas_sredne: m += s b = m/len(mas_sredne) mas.sort()
mas.reverse() print("Відсортовані числа за спаданням:\n",mas) print("Середне число:",bin(int(b)))
Пример:
Числа в 10 системі: [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15] Перевод чисел в 2 систему: Числа в 2 системі: ['0b0', '0b1', '0b10', '0b11', '0b100', '0b101', '0b110', '0b111', '0b1000', '0b1001', '0b1010', '0b1011', '0b1100', '0b1101', '0b1110', '0b1111'] Відсортовані числа за спаданням: ['0b111', '0b1101', '0b1101', '0b1100', '0b11', '0b1011', '0b1011', '0b1010', '0b1001', '0b10'] Середне число: 0b1001
begin
readln(m);
for k := round(sqrt(m)) downto 0 do
if (sqr(k) < m) then writeln(k, '^2 < ', m);
end.
Вот так, на Паскале + блок-схема =)