Массовый открытый онлайн-курс (сокр.: МООК; англ. Massive open online course, MOOC, произносится примерно, как «мук») — обучающий курс с массовым интерактивным участием c применением технологий электронного обучения и открытым доступом через Интернет[1], одна из форм дистанционного образования. В качестве дополнений к традиционным материалам учебного курса, таким как видео, чтение и домашние задания, массовые открытые онлайн-курсы дают возможность использовать интерактивные форумы пользователей, которые создавать и поддерживать сообщества студентов, преподавателей и ассистентов.
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.
