Натуральное число считается радостным, если оно оканчивается на 25 и является полным квадратом. Число считается полным квадратом, если является квадратом какого-то целого числа. Например, 25,225,625 радостные, а 125,49, 325 - нет. Вам дано число k. Найдите k-е радостное число.
Формат входных данных
В единственной строке задано одно целое число k (1 6 k 6 108
).
Формат выходных данных
Выведите одно целое число — k-е радостное число.
Program pr2;
var
k,n: integer;
i:longint;
begin
read (k);
n:=0;
i:=4;
while n<k do begin
i:= i+1;
if sqr(i) mod 100 = 25 then n:= n+1;
end;
write (sqr(i));
end.
Объяснение:
Это Pascal я проверял у меня правильно работает