Форум программистов, компьютерный форум CyberForum.ru

Циклические программы с регулярной сменой аргумента. - C++

Восстановить пароль Регистрация
 
jxallkmen
227 / 18 / 0
Регистрация: 27.12.2012
Сообщений: 68
27.12.2012, 18:29     Циклические программы с регулярной сменой аргумента. #1
Код С++
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
//_--------------------------------------------------------------------------
#include <vcl.h> 
#include <math.h> 
#pragma hdrstop 
#include "Unitl .h"
//-..........................................................................
#pragma package(smartjnit) 
#pragma resource "*.dfm" 
TForml *Form1;
//-..........................................................................
_fastcall TForml ::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//-..........................................................................
void_fastcall TForml ::Button1Click(TObject*Sender)
{
float k,b=3.85,d,x1=-2.3,x2=0.01,n=7,f;
k=(x2-x1)/(n+1);
Memo1->Clear();
Memo1->Lines->Append("D\tF");
for (d=x1;d<=x2;d+=k)
{
f=sqrt(b+d)*tan(3.14/(d+0.15));
Memo 1 ->Lines-> Append(FloatToStrF(d .ffFixed ,3,3)+'\t'+FloatToStrF (f,ffFixed,3,3));
} }
//-.........................................................................
Пишет ошыбку

:\Documents and Settings\Admin\Рабочий стол\main.cpp vcl.h: No such file or directory.

Исправте пожалуйста.Зарание спасибо.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.12.2012, 18:29     Циклические программы с регулярной сменой аргумента.
Посмотрите здесь:

составить циклические программы без использования операторов цикла C++
Циклические программы по накопления суммы или произведения. Массив. C++
Организация регулярной грамматики используя конечный автомат, представленный в виде графа C++
C++ Циклические программы с регулярной сменой аргумента, содержащие ветвления
C++ Циклические программы с накоплением суммы или произведения
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
jxallkmen
227 / 18 / 0
Регистрация: 27.12.2012
Сообщений: 68
27.12.2012, 19:38  [ТС]     Циклические программы с регулярной сменой аргумента. #2
Это код такой задачи:

Название: zzzzzz.jpg
Просмотров: 59

Размер: 4.7 Кб

Константа b = 3.85;

Аргумент d;

Початкове знач. параметра циклу: -2.3;

Кінцеве значення параметра циклу: 0.01;

Кількість інтервалів параметра: 7.
HighPredator
27.12.2012, 20:01
  #3
 Комментарий модератора 
jxallkmen, по-русски пишите. Сколько можно напоминать?
jxallkmen
227 / 18 / 0
Регистрация: 27.12.2012
Сообщений: 68
27.12.2012, 20:05  [ТС]     Циклические программы с регулярной сменой аргумента. #4
Цитата Сообщение от jxallkmen Посмотреть сообщение
Константа b = 3.85;
Аргумент d;
Початкове знач. параметра циклу: -2.3;
Кінцеве значення параметра циклу: 0.01;
Кількість інтервалів параметра: 7.
Поправка:

Аргумент d;

Исходное знач. параметра цикла: -2.3;

Конечное значение параметра цикла: 0.01;

Количество интервалов параметра: 7
jxallkmen
227 / 18 / 0
Регистрация: 27.12.2012
Сообщений: 68
28.12.2012, 23:35  [ТС]     Циклические программы с регулярной сменой аргумента. #5
Вот задача.

Циклические программы с регулярной сменой аргумента.

Помогите с решением в С++.
asidorchenko
379 / 205 / 25
Регистрация: 09.04.2012
Сообщений: 635
28.12.2012, 23:35     Циклические программы с регулярной сменой аргумента. #6
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
#include <iostream>
#include <windows.h>                     //Два файла с определениями, макросами
#include <windowsx.h>                  //и прототипами функций Windows
#include <process.h>                   //и прототипами функций Windows
#include <math.h>
 
#define PI 3.1415926535
 
#pragma comment (lib, "user32.lib")
#pragma comment (lib, "kernel32.lib")
#pragma comment (lib, "gdi32.lib")
 
//глобальные переменные для рисования окна
HINSTANCE hInstance; HINSTANCE hPrevInst;
LPSTR lpszArgs; int nWinMode;
/*Прототип используемой в программе оконной функции */
LRESULT CALLBACK WindowFunc(HWND, UINT, WPARAM, LPARAM);
/*Произвольный класс*/
int center_x = 200;
int center_y = 200;
int mastab_x = 20;
int mastab_y = 20;
int u = 10;
float b = 3.85;
 
class exemple
{
    public:
        /*Главная функция приложения WinMain*/
        int  WINAPI WinMain(  HINSTANCE hInstance, HINSTANCE hPrevInst,
        LPSTR lpszArgs, int nWinMode) {
        char szWinName[ ]="MyWindow";      //Произвольное имя класса главного окна
        char szTitle[ ]="Программа";               //Произвольный заголовок окна
        MSG msg;                    //Структура msg типа MSG для получения сообщений Windows
        WNDCLASS wc;                                  //Структура wc типа WNDCLASS для задания
                                    //характеристик окна
        /*Заполнение структуры wc типа WNDCLASS для описания класса главного окна*/
        ZeroMemory(&wc,sizeof(wc));                             //Обнуление всех членов структуры wc
        wc.hInstance= hInstance;                                       // Дескриптор приложения
        wc.lpszClassName=szWinName;                           // Имя класса окна
        wc.lpfnWndProc=WindowFunc;                           // Определение оконной функции
        wc.style=0;                                                            // Стиль по умолчанию
        wc.hIcon=LoadIcon(NULL,IDI_APPLICATION);           //Стандартная пиктограмма
        wc.hCursor=LoadCursor(NULL,IDC_ARROW);              //Стандартный курсор мыши
        wc.hbrBackground=GetStockBrush(WHITE_BRUSH);         // Белый фон окна
        wc.lpszMenuName=NULL;                                  // Без меню
        wc.cbClsExtra=0;                                                  // Без дополнительной информации
        wc.cbWndExtra=0;                                                // Без дополнительной информации
        /*Регистрация класса главного окна*/
        if(!RegisterClass (&wc))                                         //Если класс окна не регистрируется
        {                                    // выводим сообщение и заканчиваем выполнение программы
        MessageBox (NULL,"Окно нерегестрируется","Ошибка",MB_OK);
        return 1;}                                                           // возвращаем код ошибки
        /*Создание главного окна и отображение его на мониторе*/
        HWND hwnd = CreateWindow (                           //Вызов функции API для создания ок-на
        szWinName,                                             // имя класса главного окна
                        szTitle,                                                       // заголовок окна
                        WS_OVERLAPPEDWINDOW,               // Стиль окна
                        100,                                                            // x-координата левого угла окна
                        100,                                                            // y-координата левого угла окна
                        500,                                                            // Ширина окна
                        500,                                                            // Высота окна
                        HWND_DESKTOP,                                  // Без родительского окна
                        NULL,                                                       // Без меню
                        hInstance,                                                  // Дескриптор приложения
                        NULL);                                                     // Без дополнительных аргументов
        ShowWindow (hwnd, SW_SHOWNORMAL);       //  Вызов функции API
                                            // для отображения окна
        /*Организация цикла обнаружения сообщений*/
        while(GetMessage(&msg,NULL,0,0))               // Если есть сообщение, передать его
                    // нашему приложению
        DispatchMessage(&msg);                               //и вызвать оконную функцию WindowFunc
        return 0;                                                     //После выхода из цикла вернуться в Windows
        }                                                                    //Конец функции WinMain
 
};
 
void DrawCoordinateSystem(HDC hdc, HWND hwnd)
{
  int i,j, k, l ;
 
  TextOut(hdc,center_x, center_y, "0", 1);
 
  // оси координат
  for(i = 0; i <= u*mastab_x; i++)
  {
   SetPixel(hdc, center_x + i, center_y, RGB(0,0,0));
   SetPixel(hdc, center_x - i, center_y, RGB(0,0,0));
  }
  TextOut(hdc,center_x + i, center_y-5, "X", 1);
 
  for(k = 0; k <= u*mastab_y; k++)
  {
   SetPixel(hdc, center_x, center_y + k, RGB(0,0,0));
   SetPixel(hdc, center_x, center_y - k, RGB(0,0,0));
  }
  TextOut(hdc,center_x - 5, center_y - k + 5, "Y", 1);
 
 
  char buf[5];
 
  // координатная сетка
  for(l=0;l<u;l++)
  {
   sprintf(buf, "%d", l+1);
   TextOut(hdc,center_x+3, center_y - mastab_y * ( l + 1 ), buf, 2);
   sprintf(buf, "%d", -(l+1));
   TextOut(hdc,center_x+3, center_y + mastab_y * ( l + 1 ), buf, 2);
 
   for(i = 0; i <= u*mastab_x ; i++)
   {
    SetPixel(hdc, center_x + i, center_y + mastab_y * ( l + 1 ), RGB(64,128,128));
    SetPixel(hdc, center_x - i, center_y + mastab_y * ( l + 1 ), RGB(64,128,128));
    SetPixel(hdc, center_x + i, center_y - mastab_y * ( l + 1 ), RGB(64,128,128));
    SetPixel(hdc, center_x - i, center_y - mastab_y * ( l + 1 ), RGB(64,128,128));
   }
  }
 
  for(l=0;l<u;l++)
  {
   sprintf(buf, "%d", l+1);
   TextOut(hdc,center_x + mastab_x * ( l + 1 ), center_y+3 , buf, 2);
   sprintf(buf, "%d", -(l+1));
   TextOut(hdc, center_x - mastab_x * ( l + 1 ), center_y+3 , buf, 2);
 
   for(i = 0; i <= u*mastab_y ; i++)
   {
    SetPixel(hdc, center_x + mastab_x * ( l + 1 ), center_y + i, RGB(64,128,128));
    SetPixel(hdc, center_x + mastab_x * ( l + 1 ), center_y - i, RGB(64,128,128));
    SetPixel(hdc, center_x - mastab_x * ( l + 1 ), center_y + i, RGB(64,128,128));
    SetPixel(hdc, center_x - mastab_x * ( l + 1 ), center_y - i, RGB(64,128,128));
   }
  }
}
 
 
 
void DrawGraph(HDC hdc, HWND hwnd)
{
 float d, y;
 for(d = -2.3; d < 0.01; d+=0.00001)
 {
   if ((d + 0.15) != 0)
   {
    y = pow((double)( b + d), (double) 1.0 / 3.0 ) * tan(PI/(d+0.15));
    SetPixel(hdc, center_x + mastab_x * d, center_y + mastab_y * y, RGB(0,255,0));
   }
 }
}
 
 
 
/*Оконная функция WindowFunc главного окна, вызываемая Windows и получающая в качестве параметра сообщение из очереди сообщений данного приложения */
LRESULT CALLBACK WindowFunc(HWND hwnd, UINT message,
                                WPARAM wParam, LPARAM lParam)  {
switch(message) {                                      // выбор по значению сообщения (message)
 case WM_DESTROY:                           //При завершении приложения пользователем
 PostQuitMessage (0);                           //вызвать функцию API завершения приложения
 break;
case WM_PAINT:
 {
 HDC hdc = GetDC(hwnd);
 DrawCoordinateSystem(hdc, hwnd);
 DrawGraph(hdc, hwnd);
 ReleaseDC(hwnd, hdc);
 }
break;
default:                                    // Все сообщения, не обрабатываемые данной функцией,
                                            // направляются на обработку по умолчанию
return DefWindowProc (hwnd,message,wParam,lParam);
}                                                           //Конец оператора switch
return 0;
}
 
 
int main(void)
{
 
 class exemple val;
 val.WinMain( hInstance,  hPrevInst, lpszArgs,  nWinMode);
 
}
Yandex
Объявления
28.12.2012, 23:35     Циклические программы с регулярной сменой аргумента.
Ответ Создать тему
Опции темы

Текущее время: 20:44. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru