Даны три реальных числа. Возвести в квадрат те из их, значения

Даны три действительных числа. Возвести в квадрат те из их, значения которых неотрицательны, и в четвертую ступень- неотрицательные. JavaScript

Задать свой вопрос
1 ответ

var a,b,c:integer;

begin

write('Введите a = ' );readln(a);

if agt;=0 then a:=sqr(a) else a:=sqr(a*a);

write('Введите b = ' );readln(b);

if bgt;=0 then b:=sqr(b) else b:=sqr(b*b);

write('Введите c = ' );readln(c);

if cgt;=0 then c:=sqr(c) else c:=sqr(c*c);

writeln('a = ',a,' b = ',b,' c = ',c);

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт