Богдан
5 год назад
составььте алгоритм который отрицательное число возводит в квадрат , а из положительного числа вычисляет квадратный корень.
ОТВЕТЫ
Карп
Oct 24, 2020
Var
A:integer;
Begin
Write('A = ');ReadLn(A);
if A<0 then Write(A*A)
else Write(sqrt(A))
End.
A:integer;
Begin
Write('A = ');ReadLn(A);
if A<0 then Write(A*A)
else Write(sqrt(A))
End.
659
Смежные вопросы:
