var
x, y : real;
begin
read (x, y);
if (x > 0) and (y < 0) then writeln ('yes') else writeln ('no');
end.
не знаю только, как рассмотреть случай, если одна из координат = 0
var
a, b, c : real;
begin
if (a > b) then
begin
c : = a;
a : = abs (a + b);
b : = sqr (c) - sqr (b);
end
else
begin
c : = b;
b : = abs (b + a);
a : = sqr (c) - sqr (a);
end;
writeln (a, ' ', b);
end,
Поделитесь своими знаниями, ответьте на вопрос:
Вшколе учатся четыре талантливых подростка: иван, петр, алексей и андрей. один из них – будущий хоккеист, другой преуспел в футболе, третий – легкоатлет, четвертый подает надежды как баскетболист. о них известно следующее: иван и алексей присутствовали в спортзале, когда там занимался легкоатлет.петр и хоккеист вместе были на тренировке баскетболиста.хоккеист раньше дружил с андреем, а теперь неразлучен с иваном.иван не знаком с алексеем, таккак они учатся в разных классах и в разные смены. кто чем увлекается? футболист баскетболист легкоатлет хоккеист иван петр алексей андрей
иван-занимается легкой атлетикой,петр-баскетболом, алексей-хоккеем, андрей-футболом