close

Вход

Забыли?

вход по аккаунту

?

7

код для вставкиСкачать
Министерство образования и науки Украины
Национальный горный университет
Кафедра ПЗКС
отчет
по лабораторной работе №7
ТЕМА: Заключены Циклы
Выполнил:
студент группы КНит-10-1
Новицкий А.В
Проверили:
Качанов А.В. /_____________/
оценка: ______________
дата: "___"___________
Днепропетровск
2010
Лабораторная работа №7
Вариант 19. 1) Схема алгоритма.
2) рукопись программы.
{$APPTYPE CONSOLE}
uses
SysUtils;
var x,y,k:real;
begin
x:=0; // начальное значение x
writeln('|----------------------------------|');
writeln('| X | Y |');
writeln('|----------------------------------|');
while x<=5 do // цикл
begin
y:=0; // начально значение у
k:=0; // начальное значение к
while k<=8 do // цикл
begin
y:=y+(exp(k*x)+exp(-k*x))/2; // расчет у
k:=k+1; // инкримент к
end;
writeln('|',x:2:3,' |',y,' |'); // вывод х,у
x:=x+0.25; // увеличение аргумента на заданный шаг end;
writeln('------------------------------------');
readln;
readln;
end.
3) результаты расчета программы. 
Документ
Категория
Рефераты
Просмотров
8
Размер файла
188 Кб
Теги
лабораторная работа, лаба, лабораторная
1/--страниц
Пожаловаться на содержимое документа