написать программу в паскале: 1. Даны три числа. Вычислить, если возможно сумму квадратных корней из этих чисел, в противном случае вывести соответствующее сообщение.

Question

Информатика

Настас

5 октября, 01:00

написать программу в паскале: 1. Даны три числа. Вычислить, если возможно сумму квадратных корней из этих чисел, в противном случае вывести соответствующее сообщение.

+5

Ответы (1)

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

Светуша · Answer 1

Var a, b, c:integer;

begin

read (a, b, c);

if (a>=0) and (b>=0) and (c>=0) then

writeln (sqrt (a) + sqrt (b) + sqrt (c))

else

writeln ('Одно из чисел отрицательное');

end.