Какое число будет написано на экране компьютера в результате выполнения фрагмента

Какое число будет напечатано на экране компьютера в результате исполненья фрагмента программы?
Бейсик
D=1
FOR K=3 TO 5
D=D*3
NEXT K
PRINT D
Паскаль
D:=1;
FOR K:=3 TO 5 DO
D:=D*3;
WRITELN(D);