Последовательности Опции

[Dr. Ra]

Проблемма - не могу найти ничего о последовательностях
Примерный вид задачи:
Определить, сколько в этой последовательности чисел ялвляется квадратами целых чисел.

[virt]

Код

if sqr(trunc(sqrt(a))) = a then {число есть квадрат целого}