Вычислите сумму, произведений

@Daarimas1234 · Регистрация: 21.01.2018

Как решить это, погуглил. ничего не нашел похожего

@wer1 · 06.12.2018, 10:00

1.

QBasic/QuickBASIC

CLS
 
DO
   INPUT "X = "; x
LOOP UNTIL x <> -5
 
FOR n = 1 TO 5
   SUM = SUM + COS(n)
NEXT
 
Y = (ATN(x ^ 2) + SUM) / (x + 5)
PRINT "Y ="; Y

2.

QBasic/QuickBASIC

CLS
 
DO
   INPUT "Y = "; y
LOOP UNTIL y > 0
 
P = 1
 
FOR k = 1 TO 10
   P = P * LOG(k * y)
NEXT
 
Z = P + y ^ 2
PRINT "Z ="; Z

@Daarimas1234 0 / 0 / 0 Регистрация: 21.01.2018 Сообщений: 10
		1
	Вычислите сумму, произведений 05.12.2018, 19:32. Показов 946. Ответов 1 Метки нет (Все метки) Как решить это, погуглил. ничего не нашел похожего Изображения __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы