В школьном буфете к окончанию уроков осталось несколько пирожных: a ванильных, b шоколадных и c фруктовых. Дима собирается купить пирожные перед закрытием буфета. Какое наибольшее возможное количество пирожных может выбрать Дима? Pascal, 7 класс ОЧЕНЬ

var
  a, b: integer;
begin
  readln(a, b);
  writeln(System.Math.Sign(a) = System.Math.Sign(b) ? 'Да' : 'Нет');
end.

Или  ̶п̶р̶и̶м̶и̶т̶и̶в̶н̶е̶е̶  проще:
var
  a, b: integer;
begin
  readln(a, b);
  if (a > 0) then a := 1;
  if (a = 0) then a := 0;
  if (a < 0) then a := -1;
  if (b > 0) then b := 1;
  if (b = 0) then b := 0;
  if (b < 0) then b := -1;
  if (a = b) then
    writeln('Yes')
  else
    writeln('No');
end.

Немного  ̶у̶п̶р̶о̶̶щ̶̶ё̶н̶н̶ы̶й̶  оптимизированный вариант:
var
  a, b: integer;
begin
  readln(a, b);
  if (a > 0) then 
    a := 1
  else
    if (a = 0) then
      a := 0
    else
      a := -1;
  if (b > 0) then 
    b := 1
  else
     if (b = 0) then 
       b := 0
     else
       b := -1;
  if (a = b) then
    writeln('Yes')
  else
    writeln('No');
end.

Графический интерфейс компьютера будущего интегрирован в повседневную жизнь человека посредством дополненной реальности. Взаимодействие осуществляется при голосового интерфейса или жестами. Процессор имеет прямой канал связи с мозгом, в котором данные от процессора фильтруются и при отсутствии вреда пользователю, уже передаются в мозг человека.С целью снижения психической нагрузки используется звуки природы. При сильном угнетении нервной системы в результате длительной работы, человеку предлагается поспать, если вред нервной системе неизбежен, используется введение пси-геля и активируется массажная функция одежды. Система в данном случае полностью локализованна, для избежания нанесения вреда другими людьми.