Создать одномерный массив целых случайных чисел в интервале от -10 до 25 в количестве из 30 элементов. распечатать данный массив, вычислить сумму положительных элементов 2 и 3 массива.
221
315
Ответы на вопрос:
Не понятно что значит " 2 и 3 массива", остальное сделанно var a: array[1..100] of integer; i, n, sum: integer; begin n : = 30; writeln('данные массива: '); for i : = 1 to n do begin a[i] : = random(35) - 10; write(a[i], ' '); end; writeln(); sum : = 0; for i : = 1 to n do if a[i] > 0 then sum : = sum + a[i]; writeln('sum = ', sum); end.
Если в одном ящике находится помещается 10 кг апельсинов, то сколько поместится в 8-и ящиках? 1)10х8=80(кг) ответ: в восьми ящиках помещается 80 кг апельсинов.
Популярно: Информатика
-
Ira20048902.01.2023 15:50
-
ansarildar15.05.2021 09:48
-
аля66825.03.2020 20:31
-
JennieBlackpink199623.06.2021 00:59
-
Artemka161017.05.2020 00:26
-
СашаТарсюк13.02.2022 23:53
-
antonangel88p09szr27.03.2021 05:41
-
pandapurple04.06.2021 18:00
-
vlad19941100307.02.2020 00:13
-
sofiapristensk13.07.2022 22:21