(с клавиатуры ввести а=3, в=2, с=-4), вывести 2 корня
Делать это в паскале абс
Var a,b,c:real;
begin
readln(a,b,c);
a:=sqrt(a);
b:=sqrt(b);
c:=sqrt(c);
print(a,b,c);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
