Заказ
  PHP скрипты   NEW
Правила написания
Студенту
Банк Рефератов
# A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ы Э Ю Я
Телефонные справочники
Выбор города:
А Б В Г Д Е Ж З И К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Э Ю Я

Онлайн телефонные справочники
Выбор города:
А Б В Г Д Е Ж З И К Л М Н О П Р С Т У Х Ш Э Ю Я

скачай готовый реферат
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ы Э Ю Я

Лабараторная работа №8



Тема: Лабараторная работа №8
Вид реферата: реферат
Дисциплина: Информатика, программирование
Оценка: Отлично/Хорошо
Формат: Microsoft Word документ
Сжатие: ZIP архив
Создан: 3 октября 2007 года
Уникальность: 100%


скачать реферат Лабараторная работа №8


Цель работы: Получение навыков реализации циклических алгоритмов с неизвестным числом повторений цикла, операторов цикла с предусловием и постусловием и итерационных циклических алгоритмов.
Задание № 17. Вычислить функцию при заданных значениях аргумента [pic]

Блок-схема.
[pic]

Программа на 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}
----------------------- x:=x0; s:=0;

Ввод x0, hx, xn

f:=f+exp(n*ln(a*b)); a:=a+hx;

n=1(1)6

Конец

Вывод f

Начало

n=1(1)6





Справочники

Москва
Санкт-Петербург
Ангарск
Братск
Бугульма
Великие Луки
Владивосток
Владимир
Волгоград
Волжский
Воронеж
Вязьма
Екатеринбург
Златоуст
Иваново
Иркутск
Казань
Калуга
Кемерово
Кострома
Краснодар
Красноярск
Курган
Ленинск-Кузнецкий
Ливны
Липецк
Магадан
Магнитогорск
Набережные Челны
Нальчик
Находка
Нижний Новгород
Нижний Тагил
Новосибирск
Новочеркасск
Новый Уренгой
Омск
Орёл
Орехово-Зуево
Петрозаводск
Печора
Ростов-на-Дону
Самара
Саратов
Тюмень
Уфа
Хабаровск
Чебоксары
Челябинск
Череповец
Ярославль





© Все права защищены. © All right reserved.