Есть ответ 👍

Нужно сделать в паскаль авс самолет летит из пункта а в пункт б со средней скоростью v. составить программу для нахождения времени полёта t1, если есть встречный ветер, скорость которого v1, и времени t2, если ветра нет. расстояние между пунктами a и б считать известным и равным s.

155
309
Посмотреть ответы 2

Ответы на вопрос:


var s, v, v1: real;

      t1, t2: real;

      b: boolean;

begin

  b: =false;

  repeat

    writeln('введите расстояние между пунктами а и б');

    readln(s);

    if s< 0 then

      begin

        writeln('отрицательное расстояние. повторите ввод');

        continue;

      end;

    writeln('введите среднюю скорость самолета');

    readln(v);

    if v< 0 then 

      begin

        writeln('отрицательная скорость. повторите ввод');

        continue;

      end;

    writeln('введите скорость встречного ветра');

    readln(v1); //если ветра нет нужно ввести 0

    if v1< 0 then

      begin

        writeln('отрицательная скорость. повторите ввод');

        continue;

      end;

    b: =true;

  until b = true;

  if v1> 0

  then

    begin

      t2: =s/v;

      writeln('время полета: ', t2);

    end

  else

    begin

      t1: =(v-v1)/s;

      writeln('время полета: ', t1);

    end;

end.

 

   

penguin2517
4,8(76 оценок)

система                надсистемашкола                        отдел образованиябольница                зданиеавтомобиль          транспортрека                                  мировой океанпланета                          солнечная система

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS