Статистика
Всего в нашей базе более 4 327 660 вопросов и 6 445 973 ответов!

найти среднею температуру воздуха за неделю ( Паскаль) программу напишите

5-9 класс

Jenya2332326a 16 янв. 2017 г., 23:05:33 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Суренчик1босс
17 янв. 2017 г., 0:09:06 (7 лет назад)

 var
n,k:integer;
a:real;
i:byte;
begin
for i:=1 to 7 do
begin
Write('Температура на  ',i,'день ');
read(n); k:=k+n;
end;
 a:=k/7;
writeln('Средняя температура=',a);
readln;
readln;
end.

Ответить

Другие вопросы из категории

дайте наиболее точное общее имя каждой группе: 1)канада,бразилия,япония 2)канада,бразилия,сша 3)канада,сша,мексика 4)амазонка,енисей,нил

5)волга,амур,иртыш 6)луара,эльба,висла 7)принтер,монитор,клавиатура 8)клавиатура,сканер,мышь 9)берёза,жасмин,ромашка 10)яблоня,груша,вишня

Читайте также

Информатика (Pascal):

Написать программу для след задачи:

Найти среднюю температуру, если кол-во n дней, когда t >=5.
Вывести ДА или НЕТ

написать прогу на паскале: у фигуристов проходит конкурс. Им присуждют баллы за 1-ю,2-ю и 3-ю программу катания. Найти средний балл всех трех программ

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



Вы находитесь на странице вопроса "найти среднею температуру воздуха за неделю ( Паскаль) программу напишите", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.