Регистрация Спросить otvet5GPT
Fox1114
12.12.2020 09:30
Информатика
Есть ответ 👍

Ввести с клавиатуры 4 числа, если сумма 1-ого и 2-ого чисел больше 20, то уменьшить эту сумму на 10. иначе увеличить на 10, если 2 число не отрицательное ( > или =0), то уменьшить все числа на единицу. иначе вычислить среднее арифметическое всех чисел (паскаль)

137
230
Посмотреть ответы 2

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

анна1796
анна1796
4,6(2 оценок)
Ответ в комментарии,для лучшей читаемости кода. program chicla; var a,b,c,d,f,sum: integer;   sr: real; begin  writeln('ââåäèòå ïåðâîå ÷èñëî');   readln(a) ;   writeln('ââåäèòå âòîðîå ÷èñëî');   readln(b);   writeln('ââåäèòå òðåòüå ÷èñëî');   readln(c);   writeln('ââåäèòå ÷åòâåðòîå ÷èñëî');   readln(d);   f: =a+b;   if f> 20 then  begin    f: =f-10;     writeln(f);   end  else    begin    f: =f+10;     writeln(f)    end;   if b> =0 then  begin    a: =a-1;     b: =b-1;     c: =c-1;     d: =d-1;     writeln('1 ÷èñëî ïîñëå óìåíüøåíèÿ íà åäèíèöó= ',a);     writeln('2 ÷èñëî ïîñëå óìåíüøåíèÿ íà åäèíèöó= ' ,b);     writeln('3 ÷èñëî ïîñëå óìåíüøåíèÿ íà åäèíèöó= ' ,c);     writeln('4 ÷èñëî ïîñëå óìåíüøåíèÿ íà åäèíèöó= ' ,d);   end  else  begin    sr: =(a+b+c+d)/4;     writeln('ñðåäíåå àðèôìåòè÷åñêîå = ' ,sr);   end; end.
poroikovp
poroikovp
4,5(82 оценок)

Объяснение:

123456789101112141315

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

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

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

Caktus Image

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

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

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

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

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

  • В чем отличия от ChatGPT?

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

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

GTP TOP NEWS