Стандартные математические функции и процедуры Паскаля.
Нахождение степени числа. В Паскале не предусмотрена операция возведения в степень. Решим эту задачу следующим образом. Возведем . Для этого заметим: В выражениях языка Паскаль это запишется следующим образом: Заметим, что a может быть только положительным числом. Т.к. степень отрицательного числа в математике для общего случая не определена. Пример: Найдем значение выражения Как и ранее вычисления проведем в обработчике события onClick объекта Tbutton и результат выведем на форму с использованием объекта TLabel.
procedure TForm1.Button1Click(Sender: TObject); Const a=10; b=3; Var s:Real; Begin s:=sqrt(a+b+sqr(cos(a*b)))/ln(a); label1.caption:=FloatToStr(S); end;
Задания к практической работе № 4 (по вариантам):
Задание №1: 1. * Вычислить значение выражения x = b3 - f/2 при b= - 3c-a, f=7+a и вывести его на экран. 2. * Вычислить значение выражения x = f3 + b/2 при b= - 3+k/2, f=2-k*a и вывести его на экран.
3. * Вычислить значение выражения x = m2 + n/2+n при m= a2 - 3, n = 15-a и вывести его на экран. 4. * Вычислить значение выражения x = b3 - b/2-f при b= - 3c-a, f=7+a и вывести его на экран. 5. * Вычислить значение выражения x = b3 + f/2 при b= - 3+k/2, f=2-k*a и вывести его на экран. 6. * Вычислить значение выражения x = m2 + n/2 при m= a2 - 3, n = 15-a и вывести его на экран. 7. * Вычислить значение выражения x = f3 - b/2 при b= - 3c-a, f=7+a и вывести его на экран. 8. * Вычислить значение выражения x = b3 + b*f/2 при b= - 3+k/2, f=2-k*a и вывести его на экран. 9. * Вычислить значение выражения x = n2 + n/2-m при m= a2 - 3, n = 15-a и вывести его на экран. 10. * Вычислить значение выражения x = (b*f)3 - f/2 при b= - 3c-a, f=7+a и вывести его на экран. 11. * Вычислить значение выражения x = b*n3 + n/2 при b= - 3+k/2, f=2-k*a и вывести его на экран. 12. * Вычислить значение выражения x = b*f2 - f/2 при b= - 3c-a, f=7+a и вывести его на экран. 13. * Вычислить значение выражения x = b*n3 + b/2 при b= - 3+k/2, f=2-k*a и вывести его на экран. 14. * Вычислить значение выражения x = b3 - f/2 при b= - 3c-a, f=7+a и вывести его на экран. 15. * Вычислить значение выражения x = f3 + b/2 при b= - 3+k/2, f=2-k*a и вывести его на экран. 16. * Вычислить значение выражения x = m2 + n/2+n при m= a2 - 3, n = 15-a и вывести его на экран. 17. * Вычислить значение выражения x = b3 - b/2-f при b= - 3c-a, f=7+a и вывести его на экран. 18. * Вычислить значение выражения x = b3 + f/2 при b= - 3+k/2, f=2-k*a и вывести его на экран. 19. * Вычислить значение выражения x = m2 + n/2 при m= a2 - 3, n = 15-a и вывести его на экран. 20. * Вычислить значение выражения x = f3 - b/2 при b= - 3c-a, f=7+a и вывести его на экран. 21. * Вычислить значение выражения x = b3 + b*f/2 при b= - 3+k/2, f=2-k*a и вывести его на экран. 22. * Вычислить значение выражения x = n2 + n/2-m при m= a2 - 3, n = 15-a и вывести его на экран. 23. * Вычислить значение выражения x = (b*f)3 - f/2 при b= - 3c-a, f=7+a и вывести его на экран. 24. * Вычислить значение выражения x = b*n3 + n/2 при b= - 3+k/2, f=2-k*a и вывести его на экран. 25. * Вычислить значение выражения x = b*f2 - f/2 при b= - 3c-a, f=7+a и вывести его на экран.
26. * Вычислить значение выражения x = b*n3 + b/2 при b= - 3+k/2, f=2-k*a и вывести его на экран. 27. * Вычислить значение выражения x = b3 - f/2 при b= - 3c-a, f=7+a и вывести его на экран. 28. * Вычислить значение выражения x = f3 + b/2 при b= - 3+k/2, f=2-k*a и вывести его на экран.
Задание 2: Найти значение выражения при заданных значениях переменных:
[1] В версиях Delphi ниже 4 этот тип занимал 6 байт.
Воспользуйтесь поиском по сайту: ©2015 - 2024 megalektsii.ru Все авторские права принадлежат авторам лекционных материалов. Обратная связь с нами...
|