Составьте программу, определяющую номер координатной четверти, в которой находится точка с координатами (x,y). если точка лежит на оси координат или в начале координат, то выведите соответствующее сообщение. числа x, y вводятся с клавиатуры.
Var x,y:real; begin writeln('Введите координаты точки'); read(x,y); if (x>0) and (y>0) then writeln('Точка лежит в I координатной четверти'); if (x>0) and (y<0) then writeln('Точка лежит в IV координатной четверти'); if (x<0) and (y<0) then writeln('Точка лежит в III координатной четверти'); if (x<0) and (y>0) then writeln('Точка лежит в II координатной четверти'); if x=0 then writeln('Точка лежит на оси Y'); if y=0 then writeln('Точка лежит на оси Х'); end.
Как то раз Я (Будильник) разбудил своего хозяина в не то время. Хозяин как ни в чём не бывало пошёл на роботу, даже не посмотрев на часы. Так я понял что я могу управлять человеком, и сразу же после этого я стал использовать своего хозяина и всякими образами издеваться над ним. Вскоре мой хозяин стал что то подозревать, но я был хитрее, я стал переводить стрелки своих часов и человек опять верил мне, после полного досмотра и нашёл в мне неисправность его решение было очень жестким - он выкинул меня на улицу.
class Program { static void Main() { var l = new List<double>(); var r = new Random(); var n = r.Next(10, 50); for (var i = 0; i < n; i++) { l.Add(r.NextDouble() * 2); } Console.WriteLine(CountRelation(l)); Console.ReadKey(); }
static double CountRelation(IEnumerable<double> a) { var r = 0.0; var s = 0.0; foreach (var item in a) { if (item <= 1) r += item; else s += item; }
begin
writeln('Введите координаты точки');
read(x,y);
if (x>0) and (y>0) then writeln('Точка лежит в I координатной четверти');
if (x>0) and (y<0) then writeln('Точка лежит в IV координатной четверти');
if (x<0) and (y<0) then writeln('Точка лежит в III координатной четверти');
if (x<0) and (y>0) then writeln('Точка лежит в II координатной четверти');
if x=0 then writeln('Точка лежит на оси Y');
if y=0 then writeln('Точка лежит на оси Х');
end.