Форум программистов, компьютерный форум, киберфорум
Наши страницы

народ помогите с Borland C++ на С++ переделать - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Массив: Найти сумму наименьших элементов каждого столбца матрицы и их координаты http://www.cyberforum.ru/cpp-beginners/thread558186.html
Найти сумму наименьших элементов каждого столбца матрицы и их координаты
C++ Программа по приёму и выдачи сдачи, автоматом. Нужна помощь в написании программы. Условие: Кроме отверстия для приёма монет и выдачи сдачи у автомата есть кнопки "Налить" и "Сброс". При нажатии кнопки "Сброс" Осуществляется возврат монет.... http://www.cyberforum.ru/cpp-beginners/thread558185.html
Вывести на экран матрицу произведения C++
Доброго времени суток.Завтра над сдать курсовую,а эту курсовую сказали сделать позавчера. Вот задача: Пользователь вводит в размерность 2 матрицы.Матрицы заполняются случайными числами.Помимо 2...
C++ Программа использования простого столбцевого шифра
программа использования простого столбцевого шифра. не могу исправить ошибку в строкеRead_Column(Nmin, QL, QC, AR);пишет ошибку Unit3.cpp(59): E2268 Call to undefined function 'Read_Column'.Возможно...
C++ Сортировка слиянием c++ http://www.cyberforum.ru/cpp-beginners/thread558143.html
Необходимо слить 2 упорядоченных по не возрастанию списка в один, так же упорядоченный по не возрастанию , построив новый список. с++ Написала, но сортировка слиянием в основной программе, сама...
C++ Асинхронная запись Нужно реализовать программу, которая бы записывала какие-то данные в файл по средствам асинхронной записи. Подскажите, пожалуйста, как организовать такой алгоритм и как показать при работе программы,... подробнее

Показать сообщение отдельно
marque
0 / 0 / 0
Регистрация: 05.04.2012
Сообщений: 5

народ помогите с Borland C++ на С++ переделать - C++

25.04.2012, 14:16. Просмотров 385. Ответов 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
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
#include <graphics.h>
#include <stdlib.h>
#include <stdio.h>
#include <conio.h>
#include <math.h>
using namespace std;
//Рисуем спички
int Show(int sp[100][4], int all)
{
int i;
//Затираем
setcolor(0);
for(i=0;i<100;i++)
{
line(150+sp[i][0],70+sp[i][1],150+sp[i][2],70+sp[i][3]);
}
//рисуем
setcolor(7);
for(i=0;i<all;i++)
{
line(150+sp[i][0],70+sp[i][1],150+sp[i][2],70+sp[i][3]);
}
return 0;
}
int main(void)
{  //============переменные
   int sp[100][4];//спичек 100
   int Pl,Comp,All=100;//взято спичек
   int A,i,j;
   float a;//угол наклона спичек
   char ch;//vvod
   int Win=0,//победа 1 игрок 2 комп
       Esc=0,//выход
       P;//чей ход 0 комп 1 игрок
   randomize();
   //очищаем спички
   for(i=0;i<100;i++)
   {
    sp[i][0]=0;sp[i][1]=0;sp[i][2]=0;sp[i][3]=0;
   }
   //задаем расположение спичек случайно
    for(i=0;i<100;i++)
   {
    sp[i][0]=random(300);sp[i][1]=random(150);
    A=random(360);
    a=3.14*A/180;
    sp[i][2]=sp[i][0]+50*sin(a); sp[i][3]=sp[i][1]+50*cos(a);
   }
   /* request auto detection */
   int gdriver = DETECT, gmode, errorcode;
   int xmax, ymax;
   /* initialize graphics and local variables */
   initgraph(&gdriver, &gmode, "");
   /* read result of initialization */
   errorcode = graphresult();
   /* an error occurred */
   if (errorcode != grOk)
   {
      printf("Graphics error: %s\n", grapherrormsg(errorcode));
      printf("Press any key to halt:");
      getch();
      exit(1);
   }
//Кто ходит
setcolor(5);
outtextxy(200,20,"KTO hodit pervim 1 - Igrok 2 - Computer");
Xod:
ch=getch();
if(ch=='2')P=0;else
if(ch=='1')P=1;else goto Xod;
setcolor(0);
outtextxy(200,20,"KTO hodit pervim 1 - Igrok 2 - Computer");
setcolor(5);
outtextxy(310,400,"Igra");
Show(sp,All);
//====================================
char buffer[5];
//Игра
while((Win==0)&&(Esc==0))
{
 //=============================================
 //ход игрока 
if(P==1)
 {
setcolor(0);
sprintf(buffer, "%d",All);
outtextxy(200,20,"Spichek ostalos ");outtextxy(350,20,buffer);
setcolor(5);
outtextxy(100,420,"Skolko spichek berem? (1-10 jmem ot 1 do 0, 0 eto 10)");
sprintf(buffer, "%d",All);
outtextxy(200,20,"Spichek ostalos ");outtextxy(350,20,buffer);
Pl_P:
  ch=getch();
setcolor(0);
sprintf(buffer, "%d",All);
outtextxy(200,20,"Spichek ostalos ");outtextxy(350,20,buffer);
   if(ch=='1')Pl=1;else
   if(ch=='2')Pl=2;else
   if(ch=='3')Pl=3;else
   if(ch=='4')Pl=4;else
   if(ch=='5')Pl=5;else
   if(ch=='6')Pl=6;else
   if(ch=='7')Pl=7;else
   if(ch=='8')Pl=8;else
   if(ch=='9')Pl=9;else
   if(ch=='0')Pl=10;else
   if(ch==27){Esc=1;goto end;}//Выход
   else
   {
   goto Pl_P;
   }
//проверка на победу
All=All-Pl;
if(All<=0){Win=2;goto end;}
 P=0;
 }//конец хода игрока
 //=============================================
 //ход компа
 else
 {
setcolor(0);
outtextxy(100,420,"Skolko spichek berem? (1-10 jmem ot 1 do 0, 0 eto 10)");
sprintf(buffer, "%d",All);
outtextxy(200,20,"‘Spichek ostalos ");outtextxy(350,20,buffer);
if(All>12)//если спичек больше 12
 {
 for(i=1;i<10;i++)
 if(i*11+1<All) Comp=All-(i*11+1);
 if(Comp>10)Comp=1;
 }
 else
 if(All>10){Comp=10;}else
 if(All<=10){Comp=All-1;}
//Вывод хода компа
//проверка на победу
All=All-Comp;
setcolor(5);
sprintf(buffer, "%d",Comp);
outtextxy(250,420,"Comp vzial");outtextxy(350,420,buffer);
sprintf(buffer, "%d",All);
outtextxy(200,20,"Spichek ostalos ");outtextxy(350,20,buffer);
if(All<=0){Win=1;goto end;}
P=1;
outtextxy(200,460,"Najmite Space dlia prodoljenia");
getch();
setcolor(0);
sprintf(buffer, "%d",Comp);
outtextxy(250,420,"Comp vzial ");outtextxy(350,420,buffer);
sprintf(buffer, "%d",All);
outtextxy(200,20,"Spichek ostalos ");outtextxy(350,20,buffer);
outtextxy(200,460,"Najmite Space dlia prodoljenia");
 }
 //======================конец хода компа
Show(sp,All);
end:
}//============================================
//Конец игры
setcolor(0);
outtextxy(100,420,"Skolko spichek berem? (1-10 jmem ot 1 do 0, 0 eto 10)");
  if(Win==1)
  {
  setcolor(5);
  outtextxy(290,420,"Pobedil Igrok");
  outtextxy(200,460,"Najmite Space dlia Vihoda");
    }
  if(Win==2)
  {
  setcolor(5);
  outtextxy(280,420,"Pobedil computer");
  outtextxy(200,440,"Najmite Space dlia Vihoda ");
  }
  getch();
   /* vihod */
   closegraph();
   return 0;
   system ("pause");
}
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.