№ 1 Используя логические операции, запишите высказывания, которые являются истинными при выполнении следующих условий: 1) неверно, что 0 < X ≤ 3 и Y>5; 2) X является max(X,Y); 3) X не является min(X,Y); 4) Z является min(X,Y,Z). № 2 Используя логические операции, запишите высказывания, которые являются истинными при выполнении следующих условий: 1) Y не является max(X,Y,Z) и не является min(X,Y,Z); 2) X,Y,Z равны между собой; 3) каждое из чисел X,Y,Z положительно; 4) каждое из чисел X,Y,Z отрицательно.
Var d1,d2,n:integer; k,s:longint; begin Write('Введите натуральное двухзначное число: '); Read(n); d1:=n div 10; d2:=n mod 10; k:=sqr(n); s:=4*(d1*sqr(d1)+d2*sqr(d2)); Write(n,': '); if k=s then Writeln('Квадрат числа (',k, ') равен учетверенной сумме кубов его цифр') else Writeln('Квадрат числа (',k, ') не равен учетверенной сумме кубов его цифр (',s,')') end.
Тестовое решение: Введите натуральное двухзначное число: 48 48: Квадрат числа (2304) равен учетверенной сумме кубов его цифр
Введите натуральное двухзначное число: 47 47: Квадрат числа (2209) не равен учетверенной сумме кубов его цифр (1628)
Замечание: На самом деле лишь одно число 48 среди всех двухзначных чисел удовлетворяет условию равенства, так что достаточно просто сравнивать введенное число с 48, чтобы решить задачу )))
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
