Написать программу, нахождения суммы функции Z и Z1 для всех пар чисел (х,у), вводимых с клавиатуры. в том числе, если вводимые переменные принадлежат интервалу (a,b), найти сумму всех значений Z, в обратном случае найти значение суммы Z1. дано: a=1; b=10; Z=(cosx-siny)/((xy-56)+4x) ; Z1=x3+4cos3y — QBasic(Бейсик)

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 ( Скачать )

Leave a Comment