Даны числа x, y и z. Составьте программу, которая возводит в квадрат те из них, которые не отрицательные

Question

Информатика

Элюся

31 марта, 07:25

Даны числа x, y и z. Составьте программу, которая возводит в квадрат те из них, которые не отрицательные

+5

Ответы (1)

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

Антониана · Answer 1

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.