Дано трехзначное число.найти произведение кубов первой и второй его цифр.

Program gt;
var n,s:integer;
begin
readln(n);
s:=sqr(n div 100)*(n div 100)*sqr((n div 10)mod 10)*((n div 10)mod 10);
writeln(s);
end.