Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program VI;//название
- var//объявление переменных
- x:real;//вводимый аргумент x
- begin
- ReadLN(x);
- WriteLN(sqrt(x * x + 1) - sqrt(x * x + 5));//подкоренные выражения всегда больше нуля, поэтому просто вывод функции
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement