Задача по программированию на языке QBasic

@Casha512 · Регистрация: 03.02.2017

Author24 — интернет-сервис помощи студентам

Помогите, пожалуйста с решением этой задачи)

Составьте алгоритм и программу вычисления значений функции на произвольном отрезке с произвольным шагом:
y = x - x2 - при -2 < x <= 2;
y = x2 - sin(3,14 x) - в остальных случаях.

echs · 03.02.2017, 18:54

QBasic/QuickBASIC

DECLARE FUNCTION f! (x!)
 
CLS
INPUT "[A; B] = "; A, B
INPUT "SHAG H = "; h
CLS
 
FOR x = A TO B STEP h
   n = n + 1
   IF n MOD 20 = 0 THEN
      PRINT
      PRINT "PRESS ENTER"
      DO: LOOP UNTIL INKEY$ <> ""
      CLS
   ELSE
      PRINT USING "X = ###.###   Y = ###.###"; x; f(x)
   END IF
NEXT
END
 
FUNCTION f (x)
   IF -2 < x AND x <= 2 THEN
      f = x - x ^ 2
   ELSE
      f = x ^ 2 - SIN(3.14 * x)
   END IF
END FUNCTION

@Casha512 0 / 0 / 0 Регистрация: 03.02.2017 Сообщений: 3
		1
	Задача по программированию на языке QBasic 03.02.2017, 17:37. Показов 1483. Ответов 1 Метки нет (Все метки) Помогите, пожалуйста с решением этой задачи) Составьте алгоритм и программу вычисления значений функции на произвольном отрезке с произвольным шагом: y = x - x2 - при -2 < x <= 2; y = x2 - sin(3,14 x) - в остальных случаях. 0

	03.02.2017, 18:54

Задача по программированию на языке QBasic

Решение