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

Авторам Вопрос-ответ

Узнайте стоимость индивидуальной работы!

Тип задания

Предмет

Ваше имя

Вы нашли то, что искали?

Да, спасибо!

Нет, пока не нашел

Узнайте стоимость индивидуальной работы

Тип задания

Предмет

Ваше имя

это быстро и бесплатно

Оформите заказ сейчас и получите скидку 100 руб.!

Тип задания

Предмет

Ваше имя

Организация циклов в системе Паскаль

Тип Реферат

Предмет Информатика

Просмотров

476

Размер файла

24 б

Ознакомительный фрагмент работы:

Организация циклов в системе Паскаль

ФЕДЕРАЛЬНОЕ АГЕНТСТВО ПО ОБРАЗОВАНИЮ ГОСУДАРСТВЕННОЕ ОБРАЗОВАТЕЛЬНОЕ УЧРЕЖДЕНИЕ ВЫСШЕГО ПРОФЕССИОНАЛЬНОГО ОБРАЗОВАНИЯ

........................................

Кафедра «Прикладная математика и информатика»

ОТЧЕТ

ПО ЛАБОРАТОРНОЙ РАБОТЕ № ___

Дисциплина «Информатика»

Тема: «Организация циклов в системе Паскаль»

Выполнила:

Студентка группы:

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

Цель: научиться организовывать циклы трех видов в системе Паскаль

Задание: составить блок-схему алгоритма и программу на языке Паскаль вычисление значения функции Ү=F(x) для аргумента x изменяющегося от x до xс шагом изменения H.

Program Z_1;

USES CRT;

VAR XN,XK,X,Y,H,a,b:real;

I,K:integer;

BEGIN

clrscr;

writeln('Vvedite XN,XK,H,a,b');

readln(XN,XK,H,a,b);

K:=trunc((XK-XN)/H+1);

X:=XN;

FOR I:=1 to K do begin

if x>=0.5 then y:=a*x+sqrt(2*x+b)

else begin

if(x>=-6.3) and (x<0.5) then y:=sqrt(a*x)/(b*x+3)

else y:=x+0.7*a

end;

writeln('x=',x:8:2,'Y=',Y:8:2);

x:=x+H

end;

readln;

end.

Vvedite XN,XK,H,a,b

-7 1 0.5 -5 11

x= -7.00Y= -10.50

x= -6.50Y= -10.00

x= -6.00Y= -0.09

x= -5.50Y= -0.09

x= -5.00Y= -0.10

x= -4.50Y= -0.10

x= -4.00Y= -0.11

x= -3.50Y= -0.12

x= -3.00Y= -0.13

x= -2.50Y= -0.14

x= -2.00Y= -0.17

x= -1.50Y= -0.20

x= -1.00Y= -0.28

x= -0.50Y= -0.63

x= 0.00Y= 0.00

x= 0.50Y= 0.96

x= 1.00Y= -1.39

X=X+H

ax+

x+0.7a

Program Z2;

Uses crt;

Var Xn,Xk,X,Y,H:real;

i,k: integer;

Begin

Clrscr;

Writeln ('vvedite Xn,Xk,H');

Readln (Xn,Xk,H);

K:=trunc((XK-XN)/H+1);

X:=Xn;

repeat

IF X<0 then y:=2*exp(x)+LN(abs(sqr(x)*x-5))

Else begin

If x>=6 then y:=5.3*x+x+4*sin(2*x*x)

Else y:=3*sqrt(x*x+abs(x-5));

End;

Writeln ('X=',X:8:2,'Y=',Y:8:2);

X:=X+H;

Until X>Xk;

Readln;

End.

_{Program A1;}

_{Uses crt;}

_{Var Xn,Xk,X,Y,H:real;}

_{i,k: integer;}

_Begin

_Clrscr;

_{Writeln ('vvedite Xn,Xk,H');}

_{Readln (Xn,Xk,H);}

_{K:=trunc((XK-XN)/H+1);}

_X:=Xn;

_{For I:=1 to K do begin}

_{IF X<0 then y:=2*exp(x)+LN(abs(sqr(x)*x-5))}

_{Else begin}

_{If x>=6 then y:=5.3*x+x+4*sin(2*x*x)}

_{Else y:=3*sqrt(x*x+abs(x-5));}

_End;

_{Writeln ('X=',X:8:2,'Y=',Y:8:2);}

_X:=X+H;

_End;

_Readln;

_End.

Смотреть

Проект сети для центра информационных технологий
Реферат, Информатика и программирование

Смотреть

Створення власних бібліотек компонентів в Protel 99
Реферат, Информатика и программирование

Смотреть

Мифы и реальности Internet - известные и скрытые возможности сети
Реферат, Информатика и программирование

Смотреть

Программа для оценки шахматной ситуации
Реферат, Информатика и программирование

Смотреть

Нет нужной работы в каталоге?

Сделайте индивидуальный заказ на нашем сервисе. Там эксперты помогают с учебой без посредников Разместите задание – сайт бесплатно отправит его исполнителя, и они предложат цены.

Вы работаете с экспертами напрямую. Поэтому стоимость работ приятно вас удивит

Исполнитель внесет нужные правки в работу по вашему требованию без доплат. Корректировки в максимально короткие сроки

Если работа вас не устроит – мы вернем 100% суммы заказа

Наши менеджеры всегда на связи и оперативно решат любую проблему

К работе допускаются только проверенные специалисты с высшим образованием. Проверяем диплом на оценки «хорошо» и «отлично»

1 000 +

Новых работ ежедневно

Требуются доработки?
Они включены в стоимость работы

Работы выполняют эксперты в своём деле. Они ценят свою репутацию, поэтому результат выполненной работы гарантирован

Математика

История

Экономика

159599
рейтинг

3275
работ сдано

1404
отзывов

Математика

Физика

История

157252
рейтинг

6079
работ сдано

2741
отзывов

Химия

Экономика

Биология

105734
рейтинг

2110
работ сдано

1318
отзывов

Высшая математика

Информатика

Геодезия

62710
рейтинг

1046
работ сдано

598
отзывов

Тип работы

РГЗУ

Алина благодарю вас. и конечное же эту платформу которая нас связала. все

ФГБОУ ВО "ЗГУ"

Спасибо большое за работу. Все выполнено в срок без замечаний . Рекомендую всем .

Вогу

Анна выполняла работу для студента юридического вуза. Работа выполнена качественно, досроч...

Последние размещённые задания

Ежедневно эксперты готовы работать над 1000 заданиями. Контролируйте процесс написания работы в режиме онлайн

решить 22 задания по физики

Контрольная, Физика

Срок сдачи к 19 июля

2 минуты назад

сделать презентацию Тема №25

Презентация, Медицинское обеспечение физической культуры и спорта

Срок сдачи к 15 июля

4 минуты назад

Отчет о прохождении производственной практики: технологической (проектно-технологической) практики в пао «сбербанк»

Отчет по практике, Финансы и кредит

Срок сдачи к 17 июля

4 минуты назад

2 отчета по практике строительство

Отчет по практике, Строительство

Срок сдачи к 17 июля

6 минут назад

Выполнить курсовую работу. Теория государства и права. П-00035

Курсовая, Право

Срок сдачи к 24 июля

8 минут назад

Выполнить две рабочих тетради. Психология. П-00036

Контрольная, Психология

Срок сдачи к 31 июля

8 минут назад

Сделать отчет по практике( гостиница «Централь» г. Донецк)

Отчет по практике, Ресторанно-гостиничное дело

Срок сдачи к 16 июля

8 минут назад

Математика в профессиональной деятельности

Тест дистанционно, Математика

Срок сдачи к 17 июля

9 минут назад

Выполнить практику. Юриспруденция. П-00033

Отчет по практике, Юриспруденция

Срок сдачи к 17 июля

9 минут назад

Онлайн-помощь по русскому языку. П-00034

Онлайн-помощь, Русский язык

Срок сдачи к 17 июля

10 минут назад

Проверить оформление готовых отчетов по практике. Государственное муниципальное управление. П-00032

Отчет по практике, Государственное муниципальное управление

Срок сдачи к 17 июля

10 минут назад

Выполнить задание строго по практикумам и шаблонам

Бизнес-план, Проектная, менеджмент

Срок сдачи к 19 июля

10 минут назад

сделать курсовую по заданию

Курсовая, Сварочное производство

Срок сдачи к 31 июля

10 минут назад

Разработка технологии получения слитка массой 6 тонн сплава марки эп836вд методом вдп. кристаллизатор 800

Реферат, Техника и технология производства материалов

Срок сдачи к 19 июля

10 минут назад

Социальная работа. проверить нир

Отчет по практике, 39.03.02 Социальная работа, социальная работа

Срок сдачи к 14 июля

11 минут назад

Отчет по производственной практике в виде реферата по конкретной теме

Отчет по практике, Производственная практика на направлении Техносферная безопасность

Срок сдачи к 14 июля

12 минут назад

Отчет по практике, 4 семестр, профилирующая практика | у. о | учебная практика, электроэнергетика и электротехника, во, бакалавриат

Отчет по практике, Электроэнергетика

Срок сдачи к 16 июля

12 минут назад

Написать отчет по практике + задания

Отчет по практике, Юриспруденция

Срок сдачи к 30 июля

12 минут назад

Закажи индивидуальную работу за 1 минуту!

Размещенные на сайт контрольные, курсовые и иные категории работ (далее — Работы) и их содержимое предназначены исключительно для ознакомления, без целей коммерческого использования. Все права в отношении Работ и их содержимого принадлежат их законным правообладателям. Любое их использование возможно лишь с согласия законных правообладателей. Администрация сайта не несет ответственности за возможный вред и/или убытки, возникшие в связи с использованием Работ и их содержимого.