М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

Правда, в наборе предусмотрены гирьки только двух различных весов: 1 и 2 грамма. Набор не пустой, но гирьки одного из весов могут быть потеряны и полностью отсутствовать. Вася пытается разложить все имеющиеся гирьки на обе чаши весов так, чтобы весы оказались в равновесии (то есть разложить все гирьки на две кучки одинакового веса). Оказалось, что у него имеется n1 гирек весом 1 грамм и n2 гирек весом 2 грамма. Получится ли у него это? Входные данные
В первой строке входных данных записано целое число n1, во второй — n2 (n1 ≥ 0, n2 ≥ 0, 0 < n1 + n2 ≤ 2×109).

Выходные данные
Если разложить гирьки на две равные кучки возможно, пограмма должна вывести слово Yes, в противном случае — No.

Если гирьки разложить возможно, то во второй строке требуется вывести два целых числа в указанном порядке: количество гирек весом 1 грамм и количество гирек весом 2 грамма в одной из кучек в разложении. Если вариантов разложения несколько, требуется вывести любой из них.

Система оценки
Решение, правильно работающее, когда входные числа не превосходят 10, будет оцениваться в

Примеры
Ввод

Вывод

Пояснение

2
1

Yes
0 1

Также правильным ответом будет
Yes
2 0

1
2

No
0

👇
Открыть все ответы
Ответ:
MissOmnomno
MissOmnomno
07.01.2020
Var a, b, c, rez: real;
begin
write('Введите число А: ');
readln(a);
write('Введите число B: ');
readln(b);
write('Введите число C: ');
readln(c);
if (a >= 0) and (b >= 0) and (c >= 0) then rez := a + b + c;
if (a >= 0) and (b >= 0) then rez := a + b;
if (a >= 0) and (c >= 0) then rez := a + c;
if (b >= 0) and (c >= 0) then rez := b + c;
if (a <= 0) and (b <= 0) then rez := c;
if (b <= 0) and (c <= 0) then rez := a;
if (a <= 0) and (c <= 0) then rez := b;
if (a <= 0) and (b <= 0) and (c <= 0) then rez := 0;
writeln(rez);
end.

Громоздко, но, думаю, покатит
4,6(44 оценок)
Ответ:
StePAHka228
StePAHka228
07.01.2020

ответ: 2 (нажав 10 раз на стрелку вправо курсор окажется после второго пробела перед буквой r, нажав 7 раз на Delete удалим последовательно rrrttt и лишний пробел)


Есть 4 клавиши со стрелками (клавиши управления курсором): стрелка влево (назад), стрелка вправо (вперёд), стрелка вверх и стрелка вниз.

Клавиша Backspace (обычно находится над клавишей Enter, иногда обозначается стрелкой направленной влево) — используется для удаления символа, находящихся перед курсором (слева от курсора).

Клавиша Delete (иногда обозначается Del) — используется для удаления символа, находящихся за курсором (справа от курсора).

4,5(44 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ