В многострочном текстовом поле содержится значения средней температуры воздуха каждого дня недели (Числа вводятся с клавиатуры). Определите среднюю температуру воздуха за всю неделю. Выясните, сколько раз в неделю температура была выше нуля.
Программа на паскале.

1.СИН­ТЕЗ ОР­ГА­НИ­ЧЕ­СКИХ ВЕ­ЩЕСТВ В РАС­ТЕ­НИИ

Энер­гию, не­об­хо­ди­мую для сво­е­го су­ще­ство­ва­ния, рас­те­ния за­па­са­ют в виде ор­га­ни­че­ских ве­ществ. Эти ве­ще­ства син­те­зи­ру­ют­ся в ходе ___________ (А). Этот про­цесс про­те­ка­ет в клет­ках листа в ___________ (Б) — осо­бых пла­сти­дах зелёного цвета. Они со­дер­жат осо­бое ве­ще­ство зелёного цвета — ___________ (В). Обя­за­тель­ным усло­ви­ем об­ра­зо­ва­ния ор­га­ни­че­ских ве­ществ по­ми­мо воды и уг­ле­кис­ло­го газа яв­ля­ет­ся ___________ (Г).

ПЕ­РЕ­ЧЕНЬ ТЕР­МИ­НОВ: