Составьте программу, которая выводит на экран значение выражения 5 в n степени

uses crt;var n, i : integer;pr : double;Beginwrite('Степень: '); readln(n);pr := 1;for i := 1 to n do  pr  := pr * 5;writeln(pr);End.