С. здесь ошибка. не может быть такого "\%d"
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(ReadSeqInteger(20).Sum);
end.
В десятичной это 7, 162, 28, 76 соответственно
Ответ: 111(2), 34(8), 76(10), А2(16)
Если ты правильно переписал, то 20.
y:= 10;
x: = 10 + y;
то есть
x: = 10 + 10 = 20;
y:= y - 1;
то есть
y: = 10 - 1 = 9;
но это никак не влияет на x, т.к. эта операция идет уже после выполнения вычисления переменной!
begin
//1 вариант
Partition(1.1, 2.1, 10).Sum.Println;
//2 вариант
Range(11, 21).Aggregate(0.0, (Sum, x)-> Sum + x / 10).Println;
//3 вариант
Range(11, 21).Select(x->x/10).Sum.Println;
//4 вариант
var Sum := 0.0;
foreach var x in Range(11, 21) do
Sum += x / 10;
Sum.Println;
end.