ся 5 позицій, дві з них під дробову частину}
readln; {порожній оператор вводу для затримки інформації на екрані}
end.
4. Контрольний розрахунок
Вхідні дані (x) Результат у Pascal (y) Результат у MathCad (y) 05,00570,000120,00011 Значення функції не существуетЗначеніе функції не існує
Завдання № 2
1. Постановка завдання
Обчислити значення функції
В
Робочий набір вихідних даних: n = 3, x = 0,71
2. Таблиця ідентифікаторів
позначення у заданииидентификаторназначениеnnКонстанта, визначальна верхню межу зміни лічильника ціклаs, f, m, aПромежуточние результатиххІсходние данниеzzЗначеніе функцііiiСчетчік ціклаjСчетчік циклу
. Текст програми CRT; {підключення модуля CRT}
const x = 0.71; n = 3; {оголошення констант х і n }
var z, s, a: extended; {оголошення змінних z, s, а речового
типу}
i, j: byte; m: integer; {оголошення змінних i, j, m і f цілого
типу}
f: longint;
begin {початок основної програми}
clrscr; {процедура clrscr очищає екран}
a: = ln (x);
s: = 0; m: = -1; f: = 1; {присвоювання змінним s, f і m початкових
значень}
for i: = 1 to n do {цикл виконується для i від 1 до n}
begin
f: = f * i; {у змінній f буде зберігатися значення
}
s: = s + m * exp (i * a) * a/f; {в тілі зовнішнього циклу обчислюється сума
}
m: =-m; {при непарних im = -1, при парних m = 1
для обчислення}
end;
z: = sqrt (x) + x * s; {обчислення значення функції z}
writeln ('z =', z: 5: 3); {висновок значення z на екран. Під значення виділяється п'ять позицій, з них три після коми}
readln;.
4. Контрольний розрахунок
Вхідні данниеРезультат в Pascal (z) Результат у Math Cad (z) 0,9680,968
Завдання № 3
1. Постановка завдання
Обчислити значення функції для 8 значень аргументу. Початкове значення хнач = 1. Крок зміни аргументу? Х = 0,3, a = 4,2. p align="justify"> 2. Таблиця ідентифікаторів...
