Ввести два числа.заменить первое число нулем если оно равно второму и поменять оба числа на противоположные в противном случае
Что такое "противоположные"? С обратным знаком?
да
'Microsoft Qbasic INPUT a, b IF a = b THEN a = 0 ELSE a = -a: b = -b END IF PRINT a, b // PascalABC.NET 3.1, сборка 1174 от 22.02.2016 begin var a,b:real; Read(a,b); if a=b then a:=0 else begin a:=-a; b:=-b end; Println(a,b) end.
А поздно! Если язык не указан, то в ответе можно использоват любой.
И что же делать?
А если Вам по бездумью наплевать на труд других - то это Ваша проблема.
Если я не знала о существовании других языков програмирования,это не значит ,что мне наплевать на труд других.Еще раз прошу прщения.
Вы не могли не знать о существовании других языков уже хотя бы потому, что , что это дается в самом начале изучения курса.
Следующей у Вас будет проблема, что Вы никогда не слышали о том, что версий Паскаля множество.
В силу своего возраста и недавней даты изучения информатики могу ответить ,что эта проблема есть и она далеко не единственная.
Да. Поэтому не откужу себе в удовольствии добавить решение и на паскале, чтобы послушать, что "это не так, как мы учили".
Вы услышите лишь слова моей безграничной благодарности.
Услышал.