Впервый день тренировок спортсмен пробежал 10 км, каждый последующий день он увеличивал дневную норму на 2 километра от нормы предыдущего дня. через сколько дней спортсмен будет пробегать в день более 20 км? написать программу в паскале по этой .

program HelloWorld;

var run, day: integer;

begin

    run := 10;

    day := 1;

    while run<20 do

    begin

        write('День:');

        write(day);

        write('Километраж:');

        writeln(run);

        day:= day +1;

        run := run+2;

    end;

    write('День:');

    write(day);

    write('Километраж:');

    writeln(run);

end.