Даны 3 действительных числа. возвести в квадрат те из них, значение которых неотрицательно, а в четвертую степень отрицательные числа. составить программу на языке паскаль, которая выводит на экран ответ для введенных с клавиатуры чисел. протестировать с числами 5,2,1. решить с условного оператора. . 30 !
157
252
Ответы на вопрос:
Var a,b,c: real; begin read(a,b,c); writeln; if a> =0 then writeln(sqr(a)) else writeln(power(a,4)); if b> =0 then writeln(sqr(b)) else writeln(power(b,4)); if c> =0 then writeln(sqr(c)) else writeln(power(c,4)); end.
Популярно: Информатика
-
пипиша23.01.2023 16:14
-
ŦáêHŷùnģ26.01.2023 04:50
-
edeeeeeeffer01.02.2023 13:10
-
арина125314.01.2022 08:49
-
kamila077421.03.2020 18:48
-
rfrfrfrfe13.08.2022 14:54
-
vika891427.10.2021 04:15
-
299030274326.11.2020 22:12
-
лллаал28.12.2022 23:37
-
gurinovichlena03.08.2021 15:42