===== PascalABC.NET =====
begin
var n := ReadInteger('Число членов последовательности:');
var s := ReadSeqInteger('Вводите:', n)
.Where(p -> (p < 10) or (p > 50)).Sum;
Println('Сумма отобранных членов равна', s)
end.
Есть такая приблуда FCEditor называется, кидаете туда программу на паскале, она вам блок-схему рисует.
Результатом или средним арифметическим чисел -3, 7, 1 будет 1.6666(6)
Входные данные целого типа. Выходные данные вещественного типа.
числа -3, 7, 1 целочисленные
число 1.6666(6) вещественное
<span>2001 - 12 + 18 = 2007
0111 1101 0001 - 1100 + 0001 0010 = 0111 1101 0111</span>