64

Помогите пожалуйста! СРОЧНО! Даны три действительных числа. Возвести в квадрат те…

26 февраля 2023

Помогите пожалуйста! СРОЧНО! Даны три действительных числа. Возвести в квадрат те из них, значения которых неотрицательны, и вчетвертую степень – отрицательные.

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



73

var a,b,c: integer; begin read (a,b,c); if a<0then a: =a*a*a*aelse a: =a*a; if b<0then b: =b*b*b*belse b: =b*b; if c<0then c: =c*c*c*celse c: =c*c; write (a,',b,',c); end. Вроде так затестируй на паскале у меня нет но суть такова вроде должна работать

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


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...