Составить программу на языке Pascal, печатающую значение TRUE, если указанное высказывание является истинным и False в противном случае.
1) среди чисел a,b,c есть хотя бы 1 пара взаимно противоположных чисел
More Questions From This User See All
Составить программу на языке Pascal, печатающую значение TRUE, если указанное высказывание является истинным и False в противном случае.
1) среди чисел a,b,c есть хотя бы 1 пара взаимно противоположных чисел
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var a, b, c: integer;
begin
readln(a, b, c);
if (a=-b)or(a=-c)or(b=-a)or(b=-c)or(c=-a)or(c=-b) then writeln('TRUE') else writeln('FALSE');
end.