ENG  RUSTimus Online Judge
Online Judge
Задачи
Авторы
Соревнования
О системе
Часто задаваемые вопросы
Новости сайта
Форум
Ссылки
Архив задач
Отправить на проверку
Состояние проверки
Руководство
Регистрация
Исправить данные
Рейтинг авторов
Текущее соревнование
Расписание
Прошедшие соревнования
Правила
вернуться в форум

Обсуждение задачи 1493. В одном шаге от счастья

AC
Послано antonblik11 27 сен 2013 20:37
var a,b,c,d,e,f:integer;
begin
 readln(a,b,c,d,e,f);
if ((a+b+c)-(d+e+f))=1  then writeln ('Yes') else
if ((d+e+f)-(a+b+c))=1 then
writeln ('Yes') else writeln ('No');
end.
Re: AC
Послано Michael [SESC UrFU] 26 фев 2014 00:25
That's a wrong program. |(a+b+c)-(d+e+f)| always is 1, so your program should always print '1'.