Как написать программу в паскале ведя значения синуса и косинуса, далее определить к...

Question

Как написать программу в паскале ведя значения синуса и косинуса, далее определить к какой части системы координат относится синус и косинус ?

Comments

Имеется в виду какой четверти?

---

да

Answer 1

Var sinx,cosx:real;
begin;
writeln('Введите sin:');
readln(sinx);
writeln('Введите cos:');
readln(cosx);
if (sin(sinx)>0) and (cos(cosx)>0) then writeln('1');
if (sin(sinx)>0) and (cos(cosx)<0) then writeln('2');<br>if (sin(sinx)<0) and (cos(cosx)<0) then writeln('3');<br>if (sin(sinx)<0) and (cos(cosx)>0) then writeln('4');
end. 

Comments

спасибо