Нужно написать 2 программы pascal
1. Дан одномерный массив из 20 элементов, массив заполнен случайными числами от -50 до 50. Вывести на экран все отрицательные элементы массива.
2. Дан одномерный массив из 30 элементов, массив заполнен случайными числами от 0 до 50. Найти сумму элементов массива.
анна2246
1
24.04.2020 12:16
1
Другие вопросы по теме Информатика
weelrockster
17.11.2020 09:36
яннис1
23.11.2020 10:58
макс3013
21.06.2019 20:00
nikitamarar2177
21.06.2019 20:00
Katyusha4368
31.05.2019 11:50
MiroshDalia
23.05.2019 17:44
111111DA
08.02.2021 12:06
alinka660066
08.02.2021 12:06
незнайка1162
08.02.2021 12:06
Популярные вопросы
- Тело массой m = 0,5 кг прижато к шероховатой вертикальной стене силой...
1 - Однородное тело плавает на границе раздела двух жидкостей. 3/4 его...
3 - Груз начинают поднимать вертикально вверх в постоянным ускорением....
3 - Навстречу друг другу движутся кусок пластилина со скоростью v1 =...
1 - Шарик, прикрепленный к пружине, совершает гармонические колебания...
1 - Тело массой m =0,1 кг упало с высоты h = 5 м. Время падения τ = 1,2...
1 - С вертолёта, находящегося на высоте h = 30 м, сбрасывают груз. Вертолёт...
1 - Два моля идеального одноатомного газа сначала охладили, а затем нагрели...
2 - На высоте H = 200 км давление воздуха составляет примерно 10 − 9...
2 - В деревянный брусок, лежащий на гладкой горизонтальной поверхности,...
2
Прикрепляю файлы с программами во вложения.
===PascalABC.NET===
// PascalABC.NET
begin
// 1
var a := ArrRandom(20, -60, 50);
a.Println.Where(p -> p < 0).Println;
// 2
var b := ArrRandom(30, 0, 50);
b.Println.Sum.Print
end.