Есть ответ 👍

Составьте логическое выражение по схеме:

171
389
Посмотреть ответы 1

Ответы на вопрос:

krit3
4,7(67 оценок)

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.

Популярно: Информатика