Даны числа x,y и z. составьте программу, которая возводит в квадрат те из них, которые не отрицательные
136
195
Ответы на вопрос:
Var x, y, z : real; begin read (x, y, z); if (x > 0) then x : = sqr (x); if (y > 0) then y : = sqr (y); if (z > 0) then z : = sqr (z); write (x, ' ', y, ' ', z); end.
Популярно: Информатика
-
tatianIWANOWNA18.06.2020 17:11
-
csmurzik19.05.2020 07:52
-
мариана2408.05.2021 21:30
-
Lala1996210.05.2021 07:22
-
miki74504.06.2023 10:14
-
Angela115620.07.2022 02:52
-
darkbluefox18.08.2021 18:38
-
muralova20.02.2022 07:01
-
nikitenkov2006623.06.2020 03:58
-
yarabar14.02.2020 02:30