Старые отчёты / ФЫР / информатика!!!!!!!!! / 1

МИНИСТЕРСТВО ПУТЕЙ СООБЩЕНИЯ РОССИЙСКОЙ ФЕДЕРАЦИИ

ПЕТЕРБУРГСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ

ПУТЕЙ СООБЩЕНИЯ

Кафедра «ИНФОРМАТИКА И ИНФОРМАЦИОННАЯ БЕЗОПАСНОСТЬ»

ОТЧЕТ

о выполненной лабораторной работе № 1

по дисциплине «Информатика»:

Структура «Следование»

Вариант 9

Выполнил студент

Дневного отделения

Факультет ЭСУ

Группы

.

Санкт-Петербург

2004

Задание №1 1 Постановка задачи.

1. Словесное описание задачи. В прямоугольной пирамиде двугранный угол при основании равен L. Определить наклон бокового ребра к плоскости основания пирамиды по формуле: если L=62⁰. Результат напечатать в градусной мере.

2. Определение состава входных и выходных данных. Входные данные: - двугранный угол при основании равен L Выходные данные: - наклон бокового ребра B

3. Математическое описание.

1. Р

   1

   35

   46

   57

   2

   Начало

   B

   L

   B=Atn(1/2*tan(3.1416*L/180))

   Конец

   азработка схемы алгоритма.

2. Разработка визуальной части.

4 Разработка кода приложения. Private Sub Command1_Click()

Dim L As Single, B As Single

L = Text1

B = Atn(1 / 2 * Tan(3.1416 * L / 180))

Print "Наклон бокового ребра B=" & B * 180 / 3.1416

End Sub

5 Отладочный пример.

Задание №2

Предложенные формулы записать в виде операторов присваивания. Числа представить в виде констант языка программирования, переменные по необходимости переобозначить.

S=1E3 dl=-3.75E-3 m=1/2

f=Sin(x)*Sqr(a/(b+c)) y=Exp(x)+x t=log(x^2-a*x+4)

4