1368

Разработка программы на языке высокого уровня

Курсовая

Информатика, кибернетика и программирование

Разработать программу на языке высокого уровня и блок-схему для вычисления арифметического выражения при заданных значениях исходных данных. Составить блок-схему алгоритма и программу для вычис-ления значения функции U, зависящей от нескольких аргументов, значения которых выбираются произвольно и задаются по вводу.

Русский

2013-01-06

130.5 KB

20 чел.

Министерство образования и науки РФ

Подольский институт (филиал)

Государственного образовательного учреждения

высшего профессионального образования

«Московский государственный открытый университет»

Кафедра «Информационные технологии»

Курсовая работа

по дисциплине «Теория и технология программирования»

Выполнил:

студент группы 6-21

Карпова А.Г.

Шифр: 609436

Проверил

преподаватель:

Челяпина О.И.

Подольск, 2010

Задание №1.

Этапы программирования

Выполнение

1) Постановка задачи

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

2) Математическое описание

3) Разработка блок-схемы

                            

4) Написание программы

Program pr1;

Var a, b, x, S, Q: real;

Begin

readln;

a:=16.6;

b:=3.4;

x:=0.61;

S:= exp(3*ln(x))*(1-cos(2*exp(2*ln(x+b)))/1+cos(2*exp(2*ln(x+b))))+a/sqrt(x+b);

Q:=(b*exp(2*(ln(x)))-a)/(exp(a*x)-1);

writeln ('Q=', Q);

writeln ('S=', S);

End.

5) Вывод результата

Q=-0.000613806205496508

S=8.51662541268611

Задание №2.

Этапы программирования

Выполнение

1) Постановка задачи

Составить блок-схему алгоритма и программу для вычисления значения функции U, зависящей от нескольких аргументов, значения которых выбираются произвольно и задаются по вводу.

2) Математическое описание

U= max(a,b)

y≠0; cos(x)≠cos(y)

3) Разработка блок-схемы

См. на след. стр.

4) Написание программы

Program pr2;

Var a, b, x, y, U: real;

Begin

writeln ('x=');

readln (x);

writeln ('y=');

readln (y);

If (y<>0) and (cos(y)<>cos(x))  then begin

a:=ln(abs(cos(x)-cos(y)))+(exp(2*ln(x)))/(2*y);

b:=exp(exp(2*ln (x))+exp(2*ln(y)))+sin(abs(4*x-2));

writeln (‘a=’,x);

Writeln(‘b=’,b);

end;

If a>b then u:=a ;

If b>a then u:=b else writeln(‘a=b’);

writeln (‘u(‘max)=’, u);

end.

5)Вывод результата

При x=2.5; y=3.5; a=2.5

b=108254988.739589

U=108254988.739589

Задание №3 (а).

Этапы программирования

Выполнение

1) Постановка задачи

Разработать программу на языке высокого уровня и структограмму для вычисления значения функции. Осуществить ввод значений вводимых исходных данных и результат вычисления значения функции, сопровождая вывод наименованиями переменных.

2) Математическое описание

   

a = 2.5

3) Разработка структограммы

Описание переменных: a, b, x, w

a:=2.5;

Ввод: x

Да

x>a

Нет

w:=exp(3*ln(x))*sqrt(x-a);

Да

x=a

Нет

w:=x*sin(a*x);

Да

x<a

Нет

w:=exp(-a*x)*cos(a*x);

Вывод:x,y

4) Написание программы

program pr31;

var a, b, x,w: real;

begin

a:=2.5;

writeln ('x=');

readln (x);

if x>a then w:=exp(3*ln(x))*sqrt(x-a);

if x=a then w:=x*sin(a*x);

if x<a then w:=exp(-a*x)*cos(a*x);

writeln('x:=',x);

writeln ('w=', w);

end.

5)Вывод результата

x:=2

w=0.00191130077129597

x:=2.5

w=-0.082948041368892

x:=3

w=19.0918830920368


Задание №3
(б).

Этапы программирования

Выполнение

1) Постановка задачи

Модифицировать программу для многократного вычисления значений функции при изменении аргумента в указанном диапазоне и с заданным шагом. Организовать вывод значений аргумента и функции в виде таблицы.

2) Математическое описание

   a=2.5

3) Разработка структограммы

Описание переменных: a, b, x, w

a:=2.5; x:=1;

Да

x>a

Нет

w:=exp(3*ln(x))*sqrt(x-a);

Да

x=a

Нет

w:=x*sin(a*x);

Да

x<a

Нет

w:=exp(-a*x)*cos(a*x);

x:=x+0.5;

x>5

4) Написание программы

program pr32;

var a, b, x,w: real;

begin

readln;

a:=2.5;

x:=1;

Repeat

if x>a then w:=exp(3*ln(x))*sqrt(x-a);

if x=a then w:=x*sin(a*x);

if x<a then w:=exp(-a*x)*cos(a*x);

writeln('x:=',x);

writeln ('w=', w);

x:=x+0.5;

until x>5;

end.

5)Вывод результата

x:=1

w=-0.0657618725797153

x:=1.5

w=-0.019297706425682

x:=2

w=0.00191130077129597

x:=2.5

w=-0.082948041368892

x:=3

w=19.0918830920368

x:=3.5

w=42.875

x:=4

w=78.3836717690616

x:=4.5

w=128.870210871248

x:=5

w=197.642353760524


Задание №4
.

Этапы программирования

Выполнение

1) Постановка задачи

Разработать программу на языке Pascal и структограмму для вычисления первых n-членов степенного ряда.

2) Математическое описание

3) Разработка структограммы

Описание переменных: n,I,x,y

Ввод: x,n

Y:=1;

For i:=1 to n do

y:=y+(exp(i*ln(x)))/(i+1);

Вывод: y

4) Написание программы

program pr4;

var n,I: integer;

Var x,y: real;

Begin

Writeln('x=',x);

readln(x);

Writeln('n=',n);

readln(n);

y:=1;

For i:=1 to n do begin

y:=y+(exp(i*ln(x)))/(i+1);

end;

Writeln('y=',y);

End.

5)Вывод результата

x=2

n=5

y=18.0666666666667

Задание №5.

Этапы программирования

Выполнение

1) Постановка задачи

Разработать программу на языке Pascal с использованием подпрограммы.

2) Математическое описание

3) Написание программы

Program pr5;
Var m: integer;
Var a, z, r: :real;
Function step(n:integer;x:real):real;
Var i: integer;
p:real;
Begin
p:=1;
For i:=1 to n do
p:=p*x;
step:=p;
end;
Begin
Readln (a,m);
z:=step(5,a);
z:=z+step(3,1/a);
if m=0 then R:=1 else if m>0 then
R:=step(m,a) else R:=step(abs(m),1/a);
z:=z/(2*r);
writeln(z);
end.

4)Вывод результата

Задание №6.

Этапы программирования

Выполнение

1) Постановка задачи

Разработать программу для распечатки слова в обратном порядке.

2) Написание программы

program pr6;

var a: string;

var i, k: integer;

begin

readln;

a:=’karpova’;

k:=length(a);

for i:=k downto 1 do

write (a[i]);

writeln;

end.

3)Вывод результата

«avoprak»


 

А также другие работы, которые могут Вас заинтересовать

28797. Дайте сравнительный анализ формационного и цивилизационного подходов к изучению прошлого 15.23 KB
  Сравнительная характеристика подходов Лучше всего выявить достоинства и недостатки цивилизационного и формационного подходов помогает взаимная критика между сторонниками данных подходов. Таким образом плюсы и минусы сторонников подходов доказывают то что преимущества двух подходов носят взаимодополняющий характер и благодаря их сочетанию можно более глубоко понять историю.
28798. Выявите черты сходства и различия в цивилизационных концепциях Н.Данилевского, О.Шпенглера, А.Тойнби, Л.Гумилева 16.03 KB
  Следующим значительным событием в становлении теории локальных цивилизаций стала работа немецкого философа и культуролога Освальда Шпенглера Закат Европы 1918.[13] Книга Шпенглера содержала не так уж много теоретических новаций в сравнении с опубликованными ранее работами Рюккерта и Данилевского однако она имела шумный успех поскольку была написана ярким языком изобиловала фактами и рассуждениями и была опубликована после завершения Первой мировой войны вызвавшей полное разочарование в западной цивилизации и усилившей кризис...
28799. Какими характерными чертами отмечено социально-культурное развитие восточно-славянских племен в 6-9вв 19.3 KB
  Предки славян принадлежали к древнему индоевропейскому единству. Одним из них и стали славяне. Позднее в славянском массиве возникают западные венеды и восточные анты ветви.
28800. Как происходило образование Древнерусского государства? Какие точки зрения по этому вопросу вам известны 21.64 KB
  Образование государства у восточных славян длительный процесс растянутый во времени благодаря чему сохранились пережитки племенной демократии. ОБРАЗОВАНИЕ ДРЕВНЕРУССКОГО ГОСУДАРСТВА 1. К политическим факторам образования государства у восточных славян следует отнести усложнение внутриплеменных отношений и межплеменные столкновения которые ускоряли становление княжеской власти повышали роль князей и дружины как обороняющих племя от внешних врагов так и выступающих в качестве арбитра при различного рода спорах.
28801. Государство Киевская Русь и его цивилизационные особенности (социально-политический строй, экономика, законодательство, культура) 16.04 KB
  на Руси распространялись славянские азбуки кириллица и глаголица созданные Кириллом и Мефодием. На Руси широкое распространение получила грамотность также ставшая результатом принятия христианства и появления литературы на славянском языке. Было принято христианство означавшее включение Руси в христианский мир. Для Киевской Руси характерно было слабое юридическое развитие недостаточность развития государственных начал отсутствие единства приведшее к последующему распаду.
28802. Почему Русь приняла христианство? Какое значение имело принятие христианства для развития страны 13.83 KB
  Культурные связи с более развитыми странами и прежде всего с Византией содействовали принятию христианства. Принятие христианства имело колоссальное политическое и культурное значение в русской истории: 1. Влияние христианства на развитие культуры проявилось в распространении на Русь славянской письменности развитии иконописи.
28803. Каковы причины политической раздробленности на Руси? Дайте характеристику русских княжеств и земель в условиях децентрализации Киевской Руси 15.29 KB
  Причины: борьба за власть рост городов набеги кочевников Киев теряет свое значение 1ВладимироСуздальскаяЮрий Долгоруковвласть принадлежала князю 2Галецко Волынская князь Даниил Романович власть принадлежала боярем князю 3Новгород власть вече народное собрание Последствие раздробленности: новые торговли развитие новых город развитие культур ослабление междоусобных войск и дробление княжеств ослабление центральной власти.
28804. Русь и Золотая Орда. Какие оценки монгольского фактора в истории России существуют в исторической литературе 15.88 KB
  Карамзина состояли в следующем: согласие с татарами позволившее провести 40 мирных лет; большая заслуга перед своей малой Родиной Московским княжеством: обогатил усилил расширил; ЛН Гумилев считал что монголотатарского ига на Руси не было Нашествия Батыя были лишь военным рейдом и последующие события не имеют к нему непосредственного отношения Он утверждал что Великое княжество Владимирское в лице Александра Невского добилось выгодного союза с Золотой Ордой В 1237 г. Батый вторгся в земли Руси. ×Ярлык на княжение зависимые...
28805. Каковы причины возвышения Москвы? Какие еще альтернативы объединения Руси вы могли бы назвать 14.07 KB
  свержение монголотатарского ига Иван III происшедшее мирным путем после отказа платить дань Орде и последующего стояния на Угре русского и татарского войск друг против друга когда хан так и не решился вступить в битву. первый свод законов нового объединенного Русского государства Судебник Ивана III. завершение процесса объединения при сыне Ивана III Василии III.