Чем отличаются унарная, позиционная и непозиционная системы счисления? !

program runner;  

var  

n,sum: real;  

i: integer;  

begin  

    n: =10;  

    sum: =0;  

    i: =0;  

    for i: =1 to 11 do begin

        sum : = sum + n;

        writeln(n: 3: 8);

        n : = n * 1.1;  

    end;

    writeln(sum: 3: 2);  

end.

тело инструкции writeln можно заменить на обычный writeln(n) и writeln(sum) соответственно, но тогда будет вывод некрасивый

пояснение: n - количество километров, которые пробегает бегун в текущий день (с самого начала равны изначальным десяти); sum - сумма; i - итератор цикла, здесь просто чтоб было именно 11 итераций - по одной на день.

в каждой итерации мы прибавляем к сумме текущий "пробег" (на первой итерации пробег инициализирован как 10, так что никаких операций производить не надо), выводим пробег на экран, после чего умножаем его на 110%.

повторяем 11 раз.

выводим сумму на экран.