x:=x+dx;

if y>0 then s:=s+y; end;

writeln(‘Сумма положительных значений s=’,s:8:3); readln;

end.

4. Результаты вычислений.

Приложение 1. Таблица вариантов задания 4

Выбрать функцию по варианту из таблицы.

Составить программу расчета таблицы значений функции f(x) на интервале a<=x<=b в n равностоящих точках. Границы интервала a, b и количество точек n ввести с клавиатуры. Результаты вывести на печать.

Вариант

Функция

f(x) =5×(1−e−0.5x) ×cos(2πx)

1Найти сумму всех положительных значений функции f(x) в расчетных точках.

f(x) = 4 ×e−0.5x ×cos(πx)

2Найти сумму всех отрицательных значений функции f(x) в заданном интервале.

f(x) = 5 ×e−0.5x ×sin(πx)

3Найти произведение вычисленных значений функции f(x), целая часть которых кратна 2.

f(x) = (1 − e−x) ×sin(4πx)

4Найти среднее арифметическое положительных значений функции f(x).

f(x) =1+sin(2πx)

5Найти количество положительных значений функции f(x) на заданном интервале.

f(x) = 4 ×e−0.5x ×cos(πx)

6Найти произведение всех отрицательных значений функции f(x) на заданном интервале.

f(x) = 5 ×(1 − e−0.5x) ×cos(2πx)

7Найти произведение всех положительных значений функции f(x) на заданном интервале.

f(x) = (1−e−x) ×sin(4πx)

8Найти сумму вычисленных значений функции f(x), целая часть которых кратна 2.

69

		f (x) =1+		sin 2πx
	9			1 + x
		Найти среднее арифметическое отрицательных значений
		функции f(x).
		f (x) =	cos(4πx)
	10		1+ x2
		Найти сумму вычисленных значений функции f(x), дробная
		часть которых > 0.5 .

	11	f ( x) = 1 + sin(2πx)
		Найти количество положительных значений функции f(x).
		f (x) =				cos(4πx)
	12					1+ x2
		Найти сумму вычисленных значений функции f(x), дробная
		часть которых < 0.5
	13	f (x) = 5 ×(1 − e−0.5x) ×cos(2πx)
		Найти произведение вычисленных значений функции f(x),
		абсолютные значения которых > 1.
	14	f (x) = 5 ×(1 −e−0.5x) ×cos(2πx)
		Найти сумму вычисленных значений функции f(x).
		f (x) =	sin 4πx
	15			1 + x2
		Найти произведение вычисленных значений функции f(x).
		f (x) =		sin 2πx
	16				1 + x
		Найти произведение вычисленных значений функции f(x),
		дробная часть которых < 0.5
		f (x) =			cos 4πx
	17				1 + x2
		Найти сумму вычисленных значений функции f(x), дробная
		часть которых > 0.5
	18	f (x) = e−0.5x ×cos2 (πx)
		Найти количество положительных значений функции f(x),
		на заданном интервале.
	19	f (x) = e−0.5 x ×cos2 (πx)
		Найти количество значений функции f(x), абсолютная
		величина целой части которых > 1.
	20	f (x) = e−2 x ×sin(2πx)
		Найти наибольшее значение функции f(x), на заданном
		интервале.

70