имилька
02.12.2022 15:49

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

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
MashaSay
08.10.2020 05:09
Var a,k,i:integer;
s:real;
begin
s:=0;
k:=0;
for i:=1 to 7 do
begin
readln(a);
s:=s+a;
if a>0 then 
inc(k);//сколько раз в неделю температура была выше нуля
end;
s:=s/7;//средняя температура.
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота