Даны 3 числа a b c возвести в квадрат тока отрицательные через qbasic
Ответы:
Если тебе нужен квадрат каждого отрицательного числа то попробуй так:
a,b,c:real
input a,b,c
if a<,0 then
a=a*a
end if
if b<,0 then
b=b*b
end if
if c<,0 then
c=c*c
end if
print a,b,c
я мог подзабыть или попутать с паскалем, так как сейчас программируюю на паскале, поэтому проверь, но алгоритм правильный