Информатика и ВТ

| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: реферат сфера, франция реферат
| Добавил(а) на сайт: Shapiro.

Лабораторные работы.

Вариант 10.

Тема 1. Линейный вычислительный процесс.

Задание 1. Составить программу для вычисления значения х и произвести вычисления на компьютере.

PROGRAM_LR1;

VAR_A,B,D,P,G:REAL;

BEGIN

WRITE(’Введите через пробел значения a, b, d, p, g’);

READ(A,B,D,P,G);

Х:=A*SIN(SQR(P))+B*SQR(COS(P))/(A*D*(SQR(P)+SQR(G)));

WRITE(’X=’,X:7:2);

END.

Тема 2. Разветвляющиеся вычислительный процесс.

Задание 2. Составить структурную схему и написать программу вычисления значения у(х) для любого значения аргумента х.

y =sin2Цx+cosЦx,, если x > 5

y =x3+x2+1, если x Ј 1

PROGRAM_LR2;

VAR_X,Y:REAL;

BEGIN

WRITELN(’Введите х’);

READLN(X);

IF_X>5_THEN_Y:=SQR(SIN(SQRT(X)))+COS(SQRT(X));

WRITE(’Y=’,Y:8:2);

ELSE_IF_X<=1_THEN_Y:=SQR(X)*X+SQR(X)+1;

WRITE(’Y=’,Y:8:2);

ELSE_WRITE(’Y не определено при данном значении Х);

END.

Тема 3. Циклический вычислительный процесс (структурный и итерационный).

Задание 3. Составить структурную схему и программу для вычисления таблицы значений функции y=f(x) на отрезке [a,b], если х на этом отрезке изменяется с шагом h.

PROGRAM_LR3;

VAR_A,B,H,X,Y:REAL;

BEGIN

WRITELN(’Введите a,b,h’);

READLN(A,B,H);

X:=A;

WRITELN(’I___X___I___Y___I’);

REPEAT

Y:=(X-SIN(X))/(LN(X)+1);

WRITELN(’I’,X:7:2,’I’,Y:7:2,’I’);

X:=X+H:

UNTIL_X>B;

Рекомендуем скачать другие рефераты по теме: отчет по практике, реферат деятельность.