Мета роботи: вивчення правил записи констант, змінних, виразів,операторів присвоювання, розділу визначення констант, розділу описузмінних і загальної структури програми на мові Turbo-Pascal. p>
Завдання № 17. Скласти програму обчислення функції і визначити характерїї залежності від значень вихідних даних:
p>
Блок-схема. p>
p>
Программа на Turbo Pascal p>
{************************************************* ***************}< br>(Програма: lab4, Лаб. раб. № 4, Вар. 17 p>
)
(Мета: вивчення правил записи констант, змінних, виразів,
)
(операторів присвоювання, розділу визначення констант, розділу p>
)опису змінних і загальної структури програми на мові Turbo-Pascal)
(Опис параметрів і змінних: p>
)
(a, c-вихідні значення, b-проміжне значення, x-значення функції)
(Необхідні підпрограми: ні. P>
)
(Метод: обчислення за формулами p>
)
(Програміст: Позднишев А.А., гр. 316 p>
)
(Перевірив: Барінов В.В., каф. ВПМ p>
)
(Дата написання: 14 лютого 2004 p>
)
{************************************************* ***************} p>
Program lab4;
Var p>
A, b, c, x: real;
Begin p>
Write ( 'Введіть а ='); read (a); p>
Write ( 'Введіть c ='); read (c); b: = a * a + c * c; x: = exp (b * ln (abs (cos (a +2.53 * c )))); p>
Writeln ( 'x =', x)
End. (lab4) p>
Результати обчислення програми: p>
a = 1c = 2x = 8,81987864801886 Е - 0001 p>
Контрольний прорахунок:a = 1c = 2b = 1 * 1 +2 * 2 = 5x = cos5 (1 +2,53 * 2) = cos5 (5,06) = 0,8819878648 p>
-------------------- --- p>
початок p>
Введення a, c p>
b: = a * a + c * c p>
x: = exp (b * ln (abs (cos (a 2,53 * c )))) p>
Висновок х p>
Кінець p>