银行贷款发放信用评价问题数学模型 第5页
 536家企业数据评分预测程序
#include <iostream>
#include <fstream>
#include <string>
#include <math.h>
using namespace std;
int main()
{
 long double a[15];
 ifstream fin("536家企业数据.txt");
 ofstream fout16("536家企业结果预测.txt");
 for (int i = 0; i < 536; ++i)
 {
  for (int j = 0; j < 15; ++j)
  {
   fin >> a[j];
  }

  long double s = －61.044 + 0.097*a[1] － 0.074*a[2] + 21.889*a[3] + 24.396*a[5] + 4.891*a[6] + 0.622*a[7] + 48.638*a[8] + 10.143*a[9] + 0.629*a[10] － 1.618*a[12] － 0.010*a[13] + 0.001*a[14];

  s = －1.0 * s;

  long double ss = 1.0 / (1.0 + pow(2.7182818459, s));

  if (ss >= 0.5)
  {
   fout16 << "+" << endl;
  }
  else
  {
   fout16 << "－" << endl;
  }
 }

 return 0;
}
附表四  536个申请贷款企业进行重新打分值一览表

编号 打分 编号 打分 编号 打分 编号 打分 编号 打分
1 + 142 + 254 － 368 － 492 +
2 + 143 + 255 － 369 － 493 +
3 + 144 + 256 － 370 － 494 +
4 + 145 + 257 － 371 － 495 +
5 + 146 + 258 － 372 － 496 +
6 + 147 + 259 － 373 － 497 +
7 + 148 + 260 － 374 － 498 +
8 + 149 － 261 － 375 － 499 +
9 + 150 + 262 － 376 － 500 +
11 + 152 + 263 － 377 － 501 +
12 + 153 + 264 － 378 － 502 +
14 + 154 + 265 － 379 － 503 +
15 + 155 + 266 － 380 － 504 +
16 + 156 + 267 － 381 － 506 +
17 + 157 + 268 － 382 － 507 +
18 + 158 + 269 － 383 － 508 +
19 + 159 + 270 － 384 － 509 +
20 + 160 + 271 － 385 － 510 +
21 + 161 + 272 － 386 － 511 +
22 + 162 + 273 － 387 － 512 +
23 + 163 + 274 － 388 － 513 +
24 + 164 + 275 － 389 － 514 +
25 + 165 + 276 － 390 － 516 +
26 + 166 + 278 － 391 － 517 +
27 + 167 + 279 + 392 － 518 +
28 + 168 + 284 + 393 － 519 +
29 + 169 + 285 － 394 － 520 +
30 + 170 + 286 － 395 － 521 －
31 + 171 + 287 － 396 － 522 －
32 + 172 + 288 － 397 － 524 －
33 + 173 + 289 － 398 － 526 －
34 + 174 + 290 － 399 － 527 －
35 + 175 + 291 － 400 － 528 －
36 + 176 + 292 － 401 － 529 －
37 + 177 + 293 － 402 － 530 －
38 + 178 + 294 － 403 － 531 －
39 + 179 + 295 － 404 － 532 －
40 + 180 + 296 － 405 － 533 －
41 + 181 + 297 － 406 － 534 －
42 + 182 + 298 － 407 － 535 －
43 + 183 + 299 － 408 － 536 －
44 + 184 + 300 － 409 － 537 －
45 + 185 + 301 － 410 － 539 －
48 + 186 － 302 － 411 － 540 －
49 + 187 + 304 － 412 － 541 －
50 + 188 + 305 － 413 － 542 －
51 + 189 + 306 － 414 － 543 －
52 + 190 + 307 － 415 － 544 －
53 + 191 + 308 － 416 － 545 －
54 + 192 + 309 － 417 － 546 －
56 + 193 + 310 － 418 － 547 －
57 + 194 + 311 － 419 － 548 －
58 + 195 + 312 － 420 － 549 －
59 + 196 + 313 － 421 － 550 －
60 + 197 + 314 － 422 － 551 －
61 + 198 + 315 － 423 － 552 －
62 + 199 + 316 － 424 － 553 －
63 + 200 + 317 － 425 － 554 －
64 + 201 + 318 － 426 + 555 －
65 + 203 + 319 － 427 + 556 －
69 － 204 + 320 － 428 + 557 －
70 + 205 + 321 － 429 + 558 －
71 － 206 + 322 － 430 + 559 －
79 + 207 + 323 － 431 + 560 －
85 + 208 + 324 － 432 + 561 －
86 － 209 + 325 － 433 + 562 －
89 + 210 + 326 － 434 + 563 －
94 + 211 + 327 － 435 + 564 －
95 + 212 + 328 － 436 + 565 －
99 － 213 + 329 － 437 + 566 －
104 + 214 + 330 － 438 + 567 －
105 + 215 + 331 － 439 + 568 －
106 + 216 + 332 － 440 + 569 －
107 + 217 + 333 － 441 + 570 －
108 + 218 + 334 － 442 + 571 －
109 + 219 + 335 － 443 + 572 －
110 + 220 + 336 － 444 + 573 －
111 + 221 + 337 － 445 + 574 －
112 + 222 + 338 － 446 + 575 －
113 + 223 － 339 － 447 + 576 －
114 + 224 － 340 － 448 + 577 －
115 + 225 － 341 － 449 + 578 －
116 + 226 － 342 － 450 + 579 －
117 + 227 － 343 － 451 + 580 －
118 + 228 － 344 － 452 + 581 －
119 + 229 － 345 － 461 － 582 －
120 + 230 － 346 － 462 － 583 －
121 + 231 － 347 － 464 － 584 －
122 + 232 － 348 － 465 － 585 －
123 + 233 － 349 － 472 － 586 －
124 + 234 － 350 － 474 + 587 －
125 + 235 + 351 － 475 + 588 －
126 + 236 － 352 － 476 + 589 －
127 + 237 － 353 － 477 + 590 －
128 + 239 － 354 － 478 + 591 －
129 + 240 － 355 － 479 + 592 －
130 + 241 － 356 － 480 + 593 －
131 + 242 － 357 － 481 + 594 －
132 + 243 － 358 － 482 + 595 －
133 + 244 － 359 － 483 + 596 －
134 + 246 － 360 － 484 + 597 －
135 + 247 － 361 － 485 + 598 －
136 + 248 － 362 － 486 + 599 +
137 + 249 － 363 － 487 + 600 －
138 + 250 － 364 － 488 +  
139 + 251 － 365 － 489 +  
140 + 252 － 366 － 490 +  
141 + 253 － 367 － 491 +  

上一页  [1] [2] [3] [4] [5] [6] [7] 下一页