Вопрос на 60 баллов по информатике!
Var n,k:integer; begin k:=5; n:=1; repeat k:=k+2; n:=n+1 until n=10; Writeln(k) end. Результат 23