Есть ответ 👍

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

285
395
Посмотреть ответы 2

Ответы на вопрос:


Var a,b,c: integer; l: boolean; begin writeln('a, b, c: '); readln(a,b,c); l: =(a=-b)or(a=-c)or(b=-c); if l then writeln('yes') else writeln('no'); end. пример: a, b, c: 5 8 -5yes
Ali0429
4,8(82 оценок)

Алг  нач цел а ввод а если mod(а,3)=0 то       вывод "да, делится"      иначе вывод "нет, не делится"  все кон

Популярно: Информатика