По программе С++ 1 Укажите объективно- ориентированный язык программирования
А)Basic
B)Fortan
C)C++
D)Pascal
E)Delphi
2-С какого оператора реализуется цикл с постусловием
А) while.
B) do ... while.
C) for.
D) switch.
3- Укажите правильную запись оператора
А) while (LOOP) < (10).
B) while (LOOP < 10).
C) while LOOP < 10 .
D) while LOOP (<10).
E) while (LOOP <(10).
145
459
Ответы на вопрос:
Function intg(p, b: real; n: integer; eps: real): real; {метод прямоугольников, рекурсия} var a, x, h, s: real; i: integer; begin a : = 0; h : = (b - a) / n; x : = a; s : = 0; for i : = 1 to n do begin s : = s + sin(x); x : = x + h; end; if abs(s * h - p) > eps then intg : = intg(s * h, b, 2 * n, eps) else intg : = s * h; end; var b, eps: real; begin write('задайте верхний предел интегрирования и точность: '); readln(b, eps); writeln('значение интеграла: ', intg(0, b, 2, eps): 0: 7); end. тестовое решение: задайте верхний предел интегрирования и точность: 2 0.000001 значение интеграла: 1.4161460 точное значение интеграла равно 1-cos(2) ≈1.416146836, т.е. заданная точность обеспечивается.
Популярно: Информатика
-
MiliitVel128.03.2022 23:50
-
sasunaklukina20.12.2020 19:46
-
jfksbsj30.06.2022 09:44
-
Finger228021.03.2021 17:15
-
tanya24010229.12.2020 22:37
-
ДвоечникТочно05.06.2023 06:42
-
rita145roden29.06.2020 03:55
-
ket9565111.03.2023 02:47
-
Misaki5926.11.2022 02:31
-
543468909.11.2020 22:12