Pascal
Ввести одномерный массив, состоящий из 10 элементов. Заменить отрицательные элементы на противоположные по знаку. Вывести полученный массив на экран

142

480

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

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

Ariana20199

Информатика

4,4(40 оценок)

===== PascalABC.NET =====

begin

var a := ReadArrInteger(10);

a.Transform(p -> Abs(p));

a.Print

end.

hdl7

Информатика

4,8(27 оценок)

1) Дан целочисленный одномерный массив состоящий из n элементов. Вывести отрицательные элементы массива.

2) Дан одномерный массив состоящий из n элементов. Если очередной элемент чётный, то прибавь к нему первый, если нечётный - прибавить последний. Первый и последний элементы не изменять. (тут можно с пояснением).

3) Дан целочисленный одномерный массив. состоящий из n элементов. Найти произведение нечётных элементов кратных 3.

Объяснение:

tatyana101035

Информатика

4,6(33 оценок)

Const n = 40; var x: array[1..n] of integer; i, k, s: integer; begin randomize; writeln('элементы массива'); k : = 0; s : = 0; for i : = 1 to n do begin x[i] : = random(50); write(x[i]: 3); end; writeln; writeln('элементы со значением в интервале [7; 10]'); for i : = 1 to n do if (x[i] > = 7) and (x[i] < = 10) then begin k : = k + 1; s : = s + x[i]; write(x[i]: 3) end; if k = 0 then writeln('не найдены') else writeln(#13#10, ' элементов: ', k, ', среднее арифметическое=', s / k: 5: 3) end. тестовое решение: элементы массива 24 33 36 29 12 7 5 36 3 48 40 40 46 6 10 23 33 3 38 48 29 37 11 40 44 16 17 18 34 38 33 39 9 0 41 37 42 2 40 31 элементы со значением в интервале [7; 10] 7 10 9 элементов: 3, среднее арифметическое=8.667

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

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

Задай свой вопрос

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

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

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

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

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

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

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