История развития хранилищ для нефти: Первые склады нефти появились в XVII веке. Они представляли собой землянные ямы-амбара глубиной 4…5 м...
Индивидуальные очистные сооружения: К классу индивидуальных очистных сооружений относят сооружения, пропускная способность которых...
Топ:
Основы обеспечения единства измерений: Обеспечение единства измерений - деятельность метрологических служб, направленная на достижение...
Интересное:
Средства для ингаляционного наркоза: Наркоз наступает в результате вдыхания (ингаляции) средств, которое осуществляют или с помощью маски...
Подходы к решению темы фильма: Существует три основных типа исторического фильма, имеющих между собой много общего...
Искусственное повышение поверхности территории: Варианты искусственного повышения поверхности территории необходимо выбирать на основе анализа следующих характеристик защищаемой территории...
Дисциплины:
2017-09-10 | 113 |
5.00
из
|
Заказать работу |
|
|
Отчет
по лабораторным работам
по дисциплине «Информатика»
Вариант 1
Выполнил:
студент гр. ________ __________________________ (Ф.И.О. студента)
Проверил:
доц., к.т.н. кафедры ПМиФИ_____________________(Ф.И.О. преподавателя)
Омск-2017
ОГЛАВЛЕНИЕ
Лабораторная работа №_1. 4
Лабораторная работа №_2. 5
Лабораторная работа №_3. 6
Лабораторная работа №_4. 7
Лабораторная работа №_5. 8
Лабораторная работа №_6. 9
Лабораторная работа №_7. 10
Лабораторная работа №1
Основы программирования в среде Турбо Паскаль.
Оператор присваивания, процедуры ввода-вывода.
Вычислить значение функции при заданных значениях констант и переменной х.
№ | x1 | x2 | a | b | c | Вычислить |
1 | 2 | 3 | 4 | 5 | 6 | 7 |
1.5 | -0.7 |
Текст программы
program LAB1;
const a=1.5; b=2; c=-0.7; {Описание констант}
var x, w, y:real; {Описание переменных}
begin
write('‚Введите X '); {Ввод данных}
readln(x);
w:= exp(ln(abs(c))*5); {вычисление степени числа}
if c<0 then w:=-w;
w:= w+ a*exp(-sqrt(x))*cos(b*x);{вычисление w}
writeln('W = ',w:15:7); {вывод результатов}
readln;
end.
Результат выполнения программы
Рис. 1. Результат выполнения лабораторной работы №1
Рис. 2. Проверка в Microsoft Excel
Лабораторная работа №2
Программирование разветвлённых алгоритмов.
Операторы передачи управления
Вычислить значение функции в зависимости от интервала, в который попадает вводимый с клавиатуры аргумент:
1. Для t [0,3], at2lnt при 1 ,
где a=-0.5,b=2 z= 1 при t<1,
eatcosbt при t>2,
Текст программы
program Lab2;
const a=-0.5; b=2; { Описание констант }
var t,z:real; { Описание переменных }
begin
write('Ввести t ');{ Ввод данных }
readln(t);
if (t>=0) and (t<=3) then begin
|
if t>2 then z:=exp(a*t)*cos(b*t){ вычисление z }
else if (t<1) and (t<=3) then z:=1
else z:=a*t*t*ln(t);
writeln('z = ',z:10:2); { вывод результатов}
end
else Writeln('При данном t функция не определена');
end.
Результат выполнения программы
Рис. 3. Результат выполнения лабораторной работы №2
Лабораторная работа №3
Программирование циклических алгоритмов
С заданным числом повторений
Вычислить значения двух функций в n равномерно расположенных в диапазоне a<x<b точках. Результаты оформит в виде таблицы.
№ п/п | a | b | n | F1(х) | F2(х) |
2 | sin x cos x | sin x + cos x -1 |
Текст программы
Program Lab3;
Uses CRT;
const a=0; b=2*pi; { Описание констант}
n=10;
var f1, f2: real; { Описание переменных }
x, dx:real;
i:integer;
Begin
clrscr;
dx:=abs((b-a)/(n-1)); {шаг по х
x:=a;
writeln('-----------------------------------');
writeln('| I | X | F1 | F2 |');
writeln('|-------|-------|--------|--------|');
for i:=1 to n do begin
f1:=sin(x)*cos(x);
f2:=sin(x)+cos(x)-1;
writeln('| ',I:3,' |',x:7:3,'|',f1:8:4,'|',f2:8:4,'|');
x:=x+dx;
end;
writeln('-----------------------------------');
readkey;
End.
Результат выполнения программы
Рис. 4. Результат выполнения лабораторной работы №3
Лабораторная работа №4
Отчет
по лабораторным работам
по дисциплине «Информатика»
Вариант 1
Выполнил:
студент гр. ________ __________________________ (Ф.И.О. студента)
Проверил:
доц., к.т.н. кафедры ПМиФИ_____________________(Ф.И.О. преподавателя)
Омск-2017
ОГЛАВЛЕНИЕ
Лабораторная работа №_1. 4
Лабораторная работа №_2. 5
Лабораторная работа №_3. 6
Лабораторная работа №_4. 7
Лабораторная работа №_5. 8
Лабораторная работа №_6. 9
Лабораторная работа №_7. 10
Лабораторная работа №1
Основы программирования в среде Турбо Паскаль.
Оператор присваивания, процедуры ввода-вывода.
Вычислить значение функции при заданных значениях констант и переменной х.
№ | x1 | x2 | a | b | c | Вычислить |
1 | 2 | 3 | 4 | 5 | 6 | 7 |
1.5 | -0.7 |
Текст программы
program LAB1;
const a=1.5; b=2; c=-0.7; {Описание констант}
var x, w, y:real; {Описание переменных}
|
begin
write('‚Введите X '); {Ввод данных}
readln(x);
w:= exp(ln(abs(c))*5); {вычисление степени числа}
if c<0 then w:=-w;
w:= w+ a*exp(-sqrt(x))*cos(b*x);{вычисление w}
writeln('W = ',w:15:7); {вывод результатов}
readln;
end.
Результат выполнения программы
Рис. 1. Результат выполнения лабораторной работы №1
Рис. 2. Проверка в Microsoft Excel
Лабораторная работа №2
|
|
История развития хранилищ для нефти: Первые склады нефти появились в XVII веке. Они представляли собой землянные ямы-амбара глубиной 4…5 м...
Состав сооружений: решетки и песколовки: Решетки – это первое устройство в схеме очистных сооружений. Они представляют...
Поперечные профили набережных и береговой полосы: На городских территориях берегоукрепление проектируют с учетом технических и экономических требований, но особое значение придают эстетическим...
Общие условия выбора системы дренажа: Система дренажа выбирается в зависимости от характера защищаемого...
© cyberpedia.su 2017-2024 - Не является автором материалов. Исключительное право сохранено за автором текста.
Если вы не хотите, чтобы данный материал был у нас на сайте, перейдите по ссылке: Нарушение авторских прав. Мы поможем в написании вашей работы!