Посчитать функцию

@O_omg · Регистрация: 21.03.2012

Составить программу вычисления функций:
1) y = sin2x, если x>2 и
2) y = 2x2 - 3x -12, если x<=2

@PCixoPAD · 26.03.2012, 11:53

Pascal

Program funkci;
var y,x:real;
Begin
write('x= '); readln(x);
If x>2 then
y:=sin(2*x)
else
y:=2*sqr(x)-3*x-12;
readln;
End.

@O_omg 0 / 0 / 0 Регистрация: 21.03.2012 Сообщений: 18
		1
	Посчитать функцию 26.03.2012, 11:48. Показов 790. Ответов 1 Метки нет (Все метки) Составить программу вычисления функций: 1) y = sin2x, если x>2 и 2) y = 2x2 - 3x -12, если x<=2 0

	26.03.2012, 11:53

Опции темы

Решение