Proc 25. Описать функцию IsSquare(K) логического типа, возвращающую TRUE, если целый параметр K (> 0) является квадратом некоторого целого числа, и FALSE в противном случае. С ее помощью найти количество квадратов в наборе из 10 целых положительных чисел.

Решение на Python 3

import random
import math

def IsSquare(K):
    x = int(math.sqrt(K))
    if K == x*x:
        return True
    return False

s = 0
for i in range(0,10):
    x = random.randrange(1,101)
    print(x,end="; ")
    s += int(IsSquare(x))

print("\nAmount of Squares:",s)