1. Составить программу ввода с клавиатуры шести чисел и нахождения суммы тех из них, которые больше 4.2. Дан массив целых чисел А, состоящий из 7 элементов. Заполнить его с клавиатуры. Найти произведение положительных элементов массива.

                                     PascalABC.NET                                      

• begin
• Println('Результат:',ReadArrInteger(6).Sum(x->x>4?x:0));
• Println('Результат:',ReadArrInteger(7).Product(x->x>0?x:1));
• end.

Первая строчка -- первое задание, вторая -- второе.

1. Конечно.