Дополнительное задание

1. Вычислить , где , .

15. Вычислить , где , .

Контрольные вопросы

1. Какие разделы включает программа на языке Pascal? Как они обозначаются?

16. Какие типы данных в языке Pascal являются стандартными? Как они обозначаются?

17. Какие операторы используются в языке Pascal? Какой вид они имеют и что означают?

18. Какие операции имеются в языке Pascal? Какой приоритет они имеют? Приведите примеры.

19. Какой синтаксис имеют стандартные математические функции и константа ? Приведите примеры.

20. Как зайти в Borland Pascal и выйти оттуда? Как создать новый файл и закрыть окно?

21. Как проверить программу на ошибки и запустить её на выполнение? Как просмотреть ответ и сохранить программу?

22. Напишите программу к одной из задач дополнительного задания.

Лабораторная работа № 1 по теме: ” Программирование вычислений. Знакомство со средой программирования”

Программа Lab1a

program Lab1a; Программа по имени Lab1a

var Раздел описания переменных

a,b,c:real; Переменные a,b,c – вещественного типа

Begin Начало раздела операторов

writeln('Введите a,b'); Вывод текста

read(a,b); Ввод переменных

c:=a+b; Переменной c присваивается значение выражения a+b

writeln('c=',c:10:3); Вывод текста ’c=’

end. Конец раздела операторов и программы

Программа Lab1b

program Lab1b; Программа по имени Lab1b

var Раздел описания переменных

a,b,c:integer; Переменные a,b,c –целочисленного типа

Begin Начало раздела операторов

read(a); Ввод переменной

readln(b); Ввод переменной

read(c); Ввод переменной

write(a); Вывод переменной

writeln(b); Вывод переменной

write(c); Вывод переменной

end. Конец раздела операторов и программы

Программа Lab1с

program Lab1с; Программа по имени Lab1с

var Раздел описания переменных

a,b,c,R,V,F:real; Переменные a,b,c,R,V,F – вещественного типа

Begin Начало раздела операторов

writeln('Введите b,c,R'); Вывод текста

read(b,c,R); Ввод переменных

a:=sqrt(sqr(c)-sqr(b));

Переменной а присваивается значение выражения

V:=4/3*pi*R*R*R

F:=(exp(0.2*ln(V))+c)/a;

writeln('F=',F); Вывод переменной

end. Конец раздела операторов и программы

Программа dz1_1

Program dz1_1; Программа по имени dz1_1

const e=2.74; Описание константы e

var Раздел описания переменных

x,a,b,c,y,d,f,g,m,z:real;

Переменные x ,a,b,c,y,d,f,g,m,z – вещественного типа

begin Начало раздела операторов

write('Введите х='); Вывод текста

readln(x); Ввод переменной

a:=cos(8/9);

b:=ln(x)+ln(20)/ln(10);

c:=abs(exp((1/3)*ln(a)));

y:=exp(5*ln(b))-exp(pi)/(4*e+c);

d:=sqr(y);

f:=1-2*sin(sqr(x));

g:=3.41+sqr(arctan(y));

m:=sqrt(abs(a-3.5));

z:=exp(d*ln(x))*m+f/g;

writeln('z=',z:6:1); Вывод переменной

e nd. Конец раздела операторов и программы

Program dz1_2

Program dz1_2; Программа по имени dz1_2

const e = 2.74; Описание константы e

var Раздел описания переменных

a,b,c,d,f,p,n,k,x,y:real;

Переменные a,b,c,d,f,p,n,k,x,y – вещественного типа

begin Начало раздела операторов

write('Введите x='); Вывод текста

readln(x); Ввод переменной

a:=exp(ln(sin(e))*10);

b:=ln(30)/ln(2);

c:=exp(-2*a)*ln(b);

d:=abs(b+(exp(3*ln(x)))-(exp(4*ln(x))))+7;

k:= ln(d)/ln(10);

f:=2*(sin(0.6)/cos(0.6));

p:=sqr(cos(pi/4))+(sin(pi/8)/cos(pi/8));

n:=f/p;

y:=k+n+c;

writeln('y=',y); Вывод переменной

e nd. Конец раздела операторов и программы

Ответы на Вопросы

1.

2.

3.

4.

5.

6.

7.

1