Question

напишіть програму в Pascal з іспользуванням if. the​

Answer 1

Ответ:

program z;

var a,b:real;

begin

write('a = ');

read(a);

write('b = ');

read(b);

if (a-sqr(b)+3)<0 then write('Неверный ввод') else write('K = ',sqrt(a-sqr(b)+3))

end.

Объяснение:

используем условный оператор, чтобы исключить отрицательное подкоренное выражение