В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
girina210482
girina210482
23.08.2021 04:01 •  Информатика

ОГРОМНЕЙШАЯ ПЕРЕВЕСТИ НА ЯЗЫК ПРОГРАММИРОВАНИЯ, от ​


ОГРОМНЕЙШАЯ ПЕРЕВЕСТИ НА ЯЗЫК ПРОГРАММИРОВАНИЯ, от ​

Показать ответ
Ответ:
lolik95
lolik95
03.05.2020 14:19

Объяснение:

(Время прилета)-(время вылета)+(часовой пояс Новосибирска 3)-(часовой пояс относительно Москвы)

Если время прилета меньше времени вылета то +24 часа (это значит прилет происходит в следующие сутки после вылета)

Например рейс в Астану. Вылет 13:40, Прилет 14:35, пояс относительно Москвы =2

14:35-13:40+3-2=0:55+3-2=1:55

или рейс в Иркутск Вылет 21:30, Прилет 1:30, пояс относительно Москвы =5

1:30+24:00-21:30+3-5=25:30-21:30+3-5=4:00+3-5=2:00

Надо понимать что это время (2:00) это именно продолжительность рейса. То есть взлет в 21:30 и через 2:00 посадка в Иркутске. В Новосибирске в это время будет 23:30, но в самом Иркутске будет 1:30

0,0(0 оценок)
Ответ:
kostyasmirnov
kostyasmirnov
22.06.2021 15:12
Program pr;
uses crt; 
Var a,b,c:integer; 

Begin   
Write('Введите 1-ю сторону: '); Readln(a);   
Write('Введите 2-ю сторону: '); Readln(b);   
Write('Введите 3-ю сторону: '); Readln(c); 
  
{Проверка на существование треугольника} 
if ((a+b)>c) and ((a+c)>b) and ((b+c)>a)   then        
     Begin                     
          if ((a=b)or (b=c) or (a=c)) then               
                Writeln('Треугольник равнобедренный');                       
 
         if ((a=b) and (b=c)) then               
            Writeln('Треугольник равносторонний')                 
         else Writeln('Треугольник разносторонний');           
  
        if ((a*a+b*b = c*c) or (a*a+c*c = b*b) or (b*b+c*c = a*a))    then
             Writeln('Треугольник прямоугольный');                      
    end   
   else       Writeln('Треугольник нельзя построить');    

Readln(); 
END.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота