Цель работы: Получение навыков реализации циклических алгоритмов с неизвестным числом повторений цикла, операторов цикла с предусловием и постусловием и итерационных циклических алгоритмов.
Задание № 17.
Вычислить
функцию при
заданных значениях
аргумента
Блок-схема.
Программа на Turbo Pascal
{******************************************************}
{Программа: lab8, Лаб. раб.8, Вар. 17 }
{Цель:Вычисление двойной суммы }
{Описание параметров и перемненных: }
{c,q-промежуточные значения }
{X,a-аргументы функции }
{S-сумма }
{N,K-переменная суммирования }
{x=x0(xh)xn }
{Требуемые подпрограммы: нет }
{Программист: Позднышев A.A. , гр. 316 }
{Проверил: Новичков B.C., каф. ВПМ }
{Дата написания: 10 апреля 2004 г. }
{*******************************************************}
Program lab8;
var
a,x,x0,hx,xn,c,q,s:real;
k,n:byte;
begin{CS}
write('x0=');
read(x0);
write('hx=');
read(hx);
write('xn=');
read(xn);
writeln('x0=',x0,'hx=',hx,'xn=',xn);
x:=x0;
s:=0;
repeat
for k:=1 to 5 do
for n:=1 to 10 do
if k>=n then a:=1 else a:=0.1;
begin
s:=s+exp((k/n)*ln(a*x));
end;
writeln('x=',x,'S=',s);
x:=x+hx;
until x>xn
end.{CS}
Министерство
образования
РФ
Рязанская
государственная
радиотехническая
академия
Кафедра ВПМ
Отчет о
лабораторной
работе № 8:
«Проектирование
алгоритмов
и программ
со структурой
вложенных
циклов»
Выполнил: ст.
гр. 316
Позднышев
А.А. Проверил:
Новичков В.С.
Рязань 2004
! |
Как писать рефераты Практические рекомендации по написанию студенческих рефератов. |
! | План реферата Краткий список разделов, отражающий структура и порядок работы над будующим рефератом. |
! | Введение реферата Вводная часть работы, в которой отражается цель и обозначается список задач. |
! | Заключение реферата В заключении подводятся итоги, описывается была ли достигнута поставленная цель, каковы результаты. |
! | Оформление рефератов Методические рекомендации по грамотному оформлению работы по ГОСТ. |
→ | Виды рефератов Какими бывают рефераты по своему назначению и структуре. |