Помогите по Паскалю
Определить сумму элементов массива Р(n), значения которых> заданного Т
Все значения ввести с клавиатуры.
Определить сумму элементов массива Р(n), значения которых> заданного Т
Все значения ввести с клавиатуры.
More Questions From This User See All
Answers & Comments
PascalABC.NET
begin
var T := ReadInteger('T =');
var P := ReadArrInteger(ReadInteger('n =')).Where(x -> x > t).Sum.Println;
end.