Есть ответ 👍

Дан массив с, состоящий из 20 элементов. найти и отпечатать первый отрицательный элемент массива и его порядковый номер, предполагая, что среди элементов массива обязательно есть отрицательные. pascal

260
455
Посмотреть ответы 3

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


Pascalabc.net 3.4.2, сборка 1847 от 28.10.2018 внимание! если программа не работает, обновите версию!

begin

  var c : = arrrandom(20, -50, 50);

  c.println;

  var i : = c.findindex(t -> t < 0);

  writeln('c[', i + 1, '] = ', c[i])

end.

пример

11 33 16 -45 -43 -41 6 -41 47 6 28 39 -28 -29 20 42 -17 -33 -4 -35

c[4] = -45


var c: array [1..20] of integer;

i,n: integer;

begin

for i: =1 to 20 do begin c[i]: =10-random(15);

write('[',i,'] ',c[i],' ');

end;

writeln;

for i: =1 to 20 do if (c[i]< 0) then begin

writeln('найдено отрицательное число "',c[i],'" с порядковым номером - ',i);

break;

end;

end.


Памятник клавиатуре -- скульптура, открытая в 2005 году в екатеринбурге. памятник представляет собой копию клавиатуры из бетона в масштабе 30: 1. общая площадь -- 16х4 метра.

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS