Ответы на вопрос:
Var k: array [1..12] of double; i: byte; begin for i : = 1 to 12 do begin write('enter the ', (new system.datetime(1, i, ('m').replace('1', ''), 'temperature: '); readln(k[i]); end; writeln('1) ', (k[12] + k[1] + k[2]) / 3); writeln('2) ', (k[3] + k[4] + k[5]) / 3); writeln('3) ', (k[6] + k[7] + k[8]) / 3); writeln('4) ', (k[9] + k[10] + k[11]) / 3); end.
Популярно: Информатика
-
nekiti44406.05.2021 22:53
-
rom4il04.01.2021 00:44
-
Feshiondiva13.05.2021 21:44
-
Дарина3737331.05.2022 23:34
-
Ангелина839426.02.2020 16:11
-
КамиляУшурова17.06.2022 16:50
-
Аскарбинка2504.01.2021 18:56
-
Лиза1851111.08.2022 03:23
-
pva199221.09.2021 04:19
-
GoldChery03.06.2021 11:57