Запишите значение переменной k, полученное в результате работы следующей программы:
var k,i: integer;
begin
k := 1;
for i:= 1 to 5 do
k := k * i;
writeln(k);
end.