М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
adelyavalieva1
adelyavalieva1
26.08.2021 15:23 •  Информатика

Написать программу, которая вычисляет среднюю за неделю температуру воздуха. исходные данные должны вводиться во время работы программы. рекомендуемый вид экрана при работе программы: введите температуру воздуха за неделю. 1 день= 2 2 день= 0 3 день= -3 4 день= 1 5 день= 3 6 день= -2 7 день= 0 средняя температура: 0.00 град.

👇
Ответ:
Саня1585
Саня1585
26.08.2021
Вот программа program suma;
var a,q,w,e,r,t,y,u:real;
begin
writeln('Введите температуру воздуха  понедельник');
readln(q);
writeln('Введите температуру воздуха  вторник');
readln(w);
writeln('Введите чесло температуру воздуха  среду');
readln(e);
writeln('Введите чесло температуру воздуха четверг');
readln(r);
writeln('Введите чесло температуру воздуха пятницу');
readln(t);
writeln('Введите чесло температуру воздуха субботу');
readln(y);
writeln('Введите чесло температуру воздуха воскресенье');
readln(u);
a:=((q+w+e+r+t+y+u)/(7));
writeln(a);
end.
Тут всё понятно
4,6(40 оценок)
Открыть все ответы
Ответ:
Лика113998
Лика113998
26.08.2021

Python

from random import randint

n=int(input('Введите количество элементов массива : '))

if n%2!=0:

 n=n+1

a=[0]*n

for i in range (0, n):

 a[i]=randint(1,100)

 

print(a)

i=0

k=0

# сортируем первую часть массива по возрастанию

while i< n//2-1:

 if a[i]>a[i+1]:

     k=a[i]

     a[i]=a[i+1]

     a[i+1]=k

     i=-1

 i +=1

# сортируем вторую часть массива по убыванию

while i < n-1:

 if a[i]<a[i+1]:

     k=a[i]

     a[i]=a[i+1]

     a[i+1]=k

     i=n//2-1

 i +=1

 

print(a)  


массив содержит чёткое количество элементов напишите программу которая сортирует первую половину мас
4,8(97 оценок)
Ответ:
Mironshiha
Mironshiha
26.08.2021

Объяснение:

1) Разницу находил по модулю, если нужна просто разность убери abs в третьей строчке с конца.

var n,cou,x,mn,n1,n2,n3,n4:integer;

begin

 readln (x);

 n4:=x mod 10;

 x:=x div 10;

 n3:=x mod 10;

 x:=x div 10;

 n2:=x mod 10;

 x:=x div 10;

 n1:=x mod 10;

 writeln (abs(n2-n3));

 writeln (n4/n1);

 end.

2) var n,cou,x,mn,n1,n2,n3,h,m,s,x1,x2,x3,x4:integer;

begin

 write ('Сколько сейчас на часах (Вводи Часы Минуты секунды): ');

 readln (h,M,s);

 writeln ('Сколько времени пройдет: ');

 readln (n1,n2,n3);

 H:=h*3600;

 M:=M*60;

 s:=H+M+s;

 n1:=n1*3600;

 n2:=n2*60;

 n3:=n3+n2+n1;

 x1:=s+n3;

 x2:=x1 div 3600;

 x3:=(x1-x2*3600) div 60;

 x4:=(x1-x2*3600-x3*60);

 writeln ('Будет часов: ',x2, ' Будет минут: ',x3, ' Будет секунд: ',x4);

 end.

 

4,7(24 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ