Задание

var s,k: integer;

begin

s := 3;

for k := 0 to 9 do

s := s + 3 ;

writeln(s);

end.

Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы программы.