Question

Натуральное число считается радостным, если оно оканчивается на 25 и является полным квадратом. Число считается полным квадратом, если является квадратом какого-то целого числа. Например, 25,225,625 радостные, а 125,49, 325 - нет. Вам дано число k. Найдите k-е радостное число.
Формат входных данных
В единственной строке задано одно целое число k (1 6 k 6 108
).
Формат выходных данных
Выведите одно целое число — k-е радостное число.

Answer 1

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 я проверял у меня правильно работает