1) Составить программу, печатающую значение true, если высказывание является…

Question

48

1) Составить программу, печатающую значение true, если высказывание является истинным, и False в противномслучаеа) Среди чисел a,b,c есть хотя бы одна пара взаимно противолположных в) Треугольник со сторонами a,b,c является равнобедренным 2) Опишите зависимости между переменными у, х, которые устанавливаются следующими сериями командб) if x>0 then y=1 else if x=0 then y: =0 else y: =-1Помогите очень прошу!

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

pmax230 · Accepted Answer

1) а) Program Z_protivopolojinie; var a,b,c,d: integer; BeginReadln (a,b,c); writeln ('Введите 3 числа через пробел'); if a=-b then d: =1; if a=-c then d: =1; if b=-c then d: =1; if d=1 then writeln (' True') else writeln (' False'); end.1) б) Program Z_treygolnik; var a,b,c,d: integer; BeginReadln (a,b,c); writeln ('Введите 3 числа через пробел'); if (a=b) and (a>0) and (b>0) and (c>0) then d1: =1; if (a=c) and (a>0) and (b>0) and (c>0) then d1: =1; if (b=c) and (a>0) and (b>0) and (c>0) then d1: =1; if d1=1 then writeln (' True') else writeln (' False'); end.2) Если x>0 то y=1; Если x=0 то y=0: Если x<0 то y=-1.

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: