Информатика 9 класс помогите пожалуйста!

запиши результат работы с программой.
program rec;
var k: integer
function P (n:integer):integer;
begin
if n=1 then P:=1
else
P:=P(n-1)+3
end;
begin
read (k) ;
writeln (P(k) )
end.
Вводится с клавиатуры: 6.