Есть ответ 👍

Написать программу суммирования элементов массива, состоящего из 20 произвольных чисел до первого отрицательного числа. плз .

211
238
Посмотреть ответы 3

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


Const n=20; var a: array [1..n] of integer;   s,i: integer;   begin  randomize; for i: = 1 to n do   begin   a[i]: =random(21)-10;   write(a[i],' ')   end; writeln; s: =0; i: =1; while (i< =n)and(a[i]> 0) do    begin s: =s+a[i]; i: =i+1; end; writeln('сумма элементов массива до первого отрицательного числа = ',s); end. пример: 7 4 -5 6 -3 0 4 4 4 3 0 0 5 6 9 6 3 -9 -3 6  сумма элементов массива до первого отрицательного числа = 11

Program symm; uses crt; const n=20; var masiv: array [1..20] of integer; i: integer; summa,x: integer; begin  for i: = 1 to n do    begin    masiv[i]: =random(25)-10;     writeln(masiv[i])    end;   for i: = 1 to n do      if (masiv[i]> 0) then    begin      x: =masiv[i];       summa: =summa+x;     end      else           begin    writeln();       writeln('сумма элементов массива до первого отрицательного числа=',summa);       halt    end; end.
olga638
4,6(38 оценок)

Кажется,  ты  ошибся.  4  слагаемое  должно быть 8/(9*81) s: =0; for  i : = 1 to 5 do begin a : = 2*i  /  (2*i+1) / (exp (i*ln (; //  exp (i*ln (3)) = 3^i, но в паскале нет степеней. if  (i mod  2  = 0)  then a  : = -a; s: =s+a; end; write (s); end. а  вот  форматов вывода в паскале я не знаю. с этим сам разбирайся.

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS