составить программу на паскале

@Олии · Регистрация: 26.09.2013

С помощью оператора if определить, находится ли точка на плоскости в замкнутой области. Если находится, то вычислить значение функции f1(x,y), если нет - то значение функции f2(x,y). Результаты выдать на экран монитора. Значение x и y ввести с клавиатуры компьютера
f1(x,y): 1/sin(x)+ln|y|
f2(x,y): x^3+x^2y+y^3
область: Название: image037.gif
Просмотров: 28

Размер: 559 байт

Название: image037.gif
Просмотров: 28

Размер: 559 байт

@Puporev · 06.11.2013, 15:21

Pascal

uses crt;
var x,y,f:real;
begin
clrscr;
writeln('Введите координаты точки');
readln(x,y);
if((x>-1)and(x<=0)and(y*y+x*x<=1))
or((x>=-1)and(x<=0)and(y<=0)and(y>=-2))
or((x>0)and(x<=2)and(y>=x-2)) then
 begin
  writeln('Точка находится в замкнутой области');
  if(sin(x)=0)or(y=0) then write('Функция не определена')
  else
   begin
    f:=1/sin(x)+ln(abs(y));
    write('f=',f:0:2)
   end
 end
else
 begin
  writeln('Точка не находится в замкнутой области');
  f:=x*x*x+x*x*y+y;
  write('f=',f:0:2)
 end;
readln
end.

@Олии 0 / 0 / 0 Регистрация: 26.09.2013 Сообщений: 5
		1
	составить программу на паскале 06.11.2013, 12:32. Просмотров 980. Ответов 1 Метки нет (Все метки) С помощью оператора if определить, находится ли точка на плоскости в замкнутой области. Если находится, то вычислить значение функции f1(x,y), если нет - то значение функции f2(x,y). Результаты выдать на экран монитора. Значение x и y ввести с клавиатуры компьютера f1(x,y): 1/sin(x)+ln\|y\| f2(x,y): x^3+x^2y+y^3 область: 0

Опции темы

составить программу на паскале

Решение