Министерство образования Республики Беларусь

Учреждение образования

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

информатики и радиоэлектроники»

Кафедра «Вычислительные методы и программирование»

КОНТРОЛЬНАЯ РАБОТА № 1

по дисциплине

«ОСНОВЫ АЛГОРИТМИЗАЦИИ И ПРОГРАММИРОВАНИЯ»

Вариант № 7

Выполнил:

студент группы 200701

Сергиевич А.В.

Минск БГУИР 2012

Задание №1.

Создать программу вычисления указанной величины. Результат проверить при заданных исходных значениях:

При x = 0.1722, y = 6.33, z = 3.2510^-4 : –205.305571.

1.1. Создание консольного приложения

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

//---------------------------------------------------------------------------

#include <iostream.h>

#include <conio.h>

#include <math.h>

#include <vcl.h>

#pragma hdrstop

//---------------------------------------------------------------------------

#pragma argsused

int main(int argc, char* argv[])

{

double x, y, z, a, b, c, d, res;

cout << "\n\tx,y,z = " << endl;

cin >> x >> y >> z;

a = 5*atan(x);

b = 1./4*acos(x);

c = x+3*(fabs(x-y))+x*x;

d = fabs(x-y)*z+x*x;

res = a-b*c/d;

cout << "\nx=" << x << "\ny=" << y << "\nz=" << z << "\nResult=" << res << endl;

cout << " Press any key ... " << endl;

getch();

return 0;

}

//---------------------------------------------------------------------------

Результаты выполнения:

1.2. Создание оконного приложения

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

//---------------------------------------------------------------------------

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

#include <math.h>

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)

{

Edit1->Text = "0,1722";

Edit2->Text = "6,33";

Edit3->Text = "3,25e-4";

Memo1->Clear();

Memo1->Lines->Add("Лабораторная работа № 1");

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

double x, y, z, a, b , c, d, rez;

x = StrToFloat(Edit1->Text);

y = StrToFloat(Edit2->Text);

z = StrToFloat(Edit3->Text);

a = 5*atan(x);

b = 1./4*acos(x);

c = (x+3*(fabs(x-y))+x*x);

d = (fabs(x-y)*z+x*x);

rez = a-b*(c/d);

Memo1->Lines->Add("При x = " + FloatToStrF(x,ffFixed,7,4)

+ "; y = " + FloatToStrF(y,ffFixed,7,2)

+ "; z = " + FloatToStrF(z,ffFixed,7,6));

Memo1->Lines->Add("Результат = " + FloatToStr(rez));

}

Результаты выполнения:

ЛИТЕРАТУРА

«ОСНОВЫ АЛГОРИТМИЗАЦИИ И ПРОГРАММИРОВАНИЯ. ЯЗЫК СИ»

М. П. Батура, В. Л. Бусько, А. Г. Корбит, Т. М. Кривоносова

Методические указания по выполнению контрольной работы по курсу «Основы алгоритмизации и программирования» для студентов 1 – 2-го курсов заочного отделения специальностей ЭВС и ПОИТ БГУИР в 2-х частях. Часть 1

Т. М. Кривоносова

Задание №2.

Вычислить значение y в зависимости от выбранной функции (x), аргумент которой определяется из поставленного условия. Возможные значения функции (x): 2x, x², х/3 (в оконном приложениии выбор выполнить с помощью компоненты RadioGroup). Предусмотреть вывод сообщений, показывающих, при каком условии и с какой функцией производились вычисления у.

, где