a = 1
b = 10
INPUT "Vvedite kolichestvo par chisel x i y N=", n
FOR i = 1 TO n
INPUT "vvedite x=", x
INPUT "vvedite y=", y
z = (COS(x) - SIN(y)) / ((x * y - 56) + 4 * x)
PRINT "z="; z
z1 = x ^ 3 + 4 * COS(3 * y)
PRINT "z1="; z1
IF x >= a AND x <= b AND y >= a AND y <= b THEN sumZ = somZ + z ELSE sumZ1 = sumZ1 + z1
NEXT
PRINT "summa Z="; sumZ
PRINT "summa Z1="; sumZ1
Тестирование выполнено в программе QB64 ( Скачать )