Реферат

Реферат Программа на Delphi

Работа добавлена на сайт bukvasha.net: 2015-10-28

Поможем написать учебную работу

Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.

Предоплата всего

от 25%

Подписываем

договор

Выберите тип работы:

Скидка 25% при заказе до 23.11.2024




Задание  : Составить программу по вычислению значения функции в заданоу точке X и Y.

F(x,y)=(cos(x)*(1-sin(x)))/(2*x^2-4*y^3).

Блоксхема программы :


Начало






Ввод X,Y






2*x^2-4*y^3=0

                                               да

      нет




z=(cos(x)*(1-sin(x)))

/(2*x^2-4*y^3).





Вывод z





Конец
Текст программы
:


Unit Unit1;

Interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type

TForm1 = class(TForm)

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

x,y,z: extended;

implementation

{$R *.DFM}

label vano;

begin

vano: write('Vvedite X=');

readln (x);

write ('Vvedite Y=');Readln (y);

if 2*x*x-4*y*y*y=0 then

begin

writeln('Pri dannix znacheniax X i Y funkcia ne imeet reshenia');

goto vano;end;

z:=(cos(x)*(1-sin(y)))/(2*x*x-4*y*y*y);

write('Otvet :',z);

end.

Контрольный проход :

X=5;Y=9

Ответ: Z=-5.81855391729781E-0005.



1. Реферат Дизентирія
2. Доклад на тему Агранулоцитоз
3. Реферат Особенности метода кластерный анализ при большом количестве наблюдений кластерный анализ метод
4. Реферат на тему Понятие рисков инвестирования
5. Лекция Агапова И. История экономической мысли
6. Реферат Жанровая система русского фольклора
7. Реферат на тему Постхолецистэктомический синдром
8. Реферат Анализ зависимости перевозок пассажиров на автомобильном транспорте
9. Реферат Трубчатые кости
10. Диплом на тему Социально-педагогическая деятельность по формированию навыков волевой регуляции у воспитанников детского 2