Регистрация Вход
Информатика 5 - 9 классы Adordred
Решено

Среди чисел a,b,c есть хотя бы одна пара взаимно противоположных чисел. Напишите программу в Паскале ABC

136
ОТВЕТЫ
Program n1;
label t;
var a,b,c: integer;
begin
readln(a,b,c);
if alt;gt;b then if abs(a)=abs(b) then goto t;
if alt;gt;c then if abs(a)=abs(c) then goto t;
if blt;gt;c then if abs(b)=abs(c) then goto t;
writeln(нет);
t:
writeln(есть);
end.
35
Отв. дан
Для написания вопросов и ответов необходимо зарегистрироваться на сайте