2 семестрп / Lab_1

Лабораторна робота №1

Тема: Робота та реалізація програми з лінійною

структурою

Мета роботи: закріплення знань алфавіту мови програмування Turbo Pascal , придбання навичок запису його констант, змінних,виразів, операторів присвоєння;оволодіння навичками складання програми з лінійною структурою та виконання її у середовищі системи програмування Turbo Pascal 6.0.

Короткі теоретичні відомості

Алфавіт мови Turbo Pascal складається з сукупності символів. За допомогою символів алфавіту можна складати різноманітні конструкції: константи, змінні, оператори, тощо.

Постійна величина (константа) не змінюється в процесі роботи програми. Є декілька видів констант: числові, символьні, рядкові, логічні.

Цілі складаються з послідовності десяткових цифр, перед якою може стояти знак “+” або “-“.

У мові Turbo Pascal цілі константи можна зображати і в шістнадцятковій системі числення.

Дійсні константи можна записувати одним з двох способів: як дійсну константу з фіксованою крапкою. Наприклад, число 0,015 можна записати як 0.015 та 0.15Е-01, або 1.5Е-02.

Символьна константа – це символ в лапках. Наприклад ‘f’

Рядкова константа – це послідовність символів в лапках. Наприклад: ‘Виведи X’

Логічні константи приймають тільки два значення: True (Істина) та False (Хибність).

Змінна визначається ім’ям (індетифікатором), типом та значенням.

Ідентифікатор є послідовністю букв, цифр і знака підкреслювання, причому перший символ не є цифрою.

Мова Pascal є суворо типізованою мовою. Це означає, що кожна змінна повинна бути описана, тобто необхідно визначити її тип.

Стандартний тип для дійсної змінної – Real. Інші типи рекомендується вживати, якщо в ЕОМ є математичний сопроцесор. Якщо сопроцесора немає, то його можна замалювати за допомогою спеціальної директиви транслятора {$E+}. При цьому, дійсні зміні будуть оброблятися програмно, що суттєво зменшує швидкість виконання програми.

Завдання 1.1

Дані математичні вирази записати мовою Pascal.

Прийняті позначення :- об’єднання множин,- переріз множин.

Розв’язок

а)(10E-7*ln(abs(3*z))+exp(0.4*ln(b)))/(ln(sqr(z+1))+4.2*10E+4

б)(abs(x)>2)or(0<b and b<3)

Завдання 1.2

Представити математичний запис виразу і показати порядок дій.

(x+4)/3/x+exp(abs(arctan(x)))/2*x+1.0E-6*exp(1/3*ln(x))

Розв’язок

Завдання 1.3

Скласти програму обчислення наступних величин та виконати її у середовищі системи програмування Turbo Pascal 6.0.

Кута між векторами а={1;2} і {1;-0.5}

Розв’язок

program lr1;

var

kut,a1,a2,b1,b2:real;

begin

writeln('vvedite a1,a2,b1,b2');

readln(a1,a2,b1,b2);

kut:=(a1*a2+b1*b2)/sqrt(sqr(a1)+sqr(a2))*sqrt(sqr(b1)+sqr(b2));

writeln('kut mig vectorami =',kut);

end.

Результати роботи програми:

vvedite a1,a2,b1,b2

1

2

1

-0.5

kut mig vectorami =0.75

Висновок: програми з лінійної структурою є найпростішими і, як правило, використовуються для реалізації звичайних обчислень за формулами. У програмах з лінійної структурою інструкції виконуються послідовно, одна за одною.

Захист

1)r=abs(exp(3*ln(sin(2)))*A*T)

2)exp(ln((y/(sqr(y)+A)))/3)*exp(z*t)

3)t=exp((k-1)*ln(2))+1

ЛР01- 6.050103.1157-04