Ceriwis

Ceriwis (https://forum.ceriwis.com/forum.php)
-   Programming (https://forum.ceriwis.com/forumdisplay.php?f=63)
-   -   All mohon bantuannya ya (https://forum.ceriwis.com/showthread.php?t=574777)

JagoVB 20th November 2011 10:03 AM

All mohon bantuannya ya
 

All mohon bantuannya untuk memperpendek coding saya ini ya



saya menggunakan dev c++



#include

#include

#include

#include

#include



void clrscr(void){

COORD coordScreen = { 0, 0 }; // sudut kiri atas

DWORD cCharsWritten;

DWORD dwConSize;

HANDLE hCon = GetStdHandle(STD_OUTPUT_HANDLE);

CONSOLE_SCREEN_BUFFER_INFO csbi;



GetConsoleScreenBufferInfo(hCon, &csbi);

dwConSize = csbi.dwSize.X * csbi.dwSize.Y;

// isi dg spasi

FillConsoleOutputCharacter(hCon, TEXT(' '), dwConSize, coordScreen, &cCharsWritten);

GetConsoleScreenBufferInfo(hCon, &csbi);

FillConsoleOutputAttribute(hCon, csbi.wAttributes, dwConSize, coordScreen, &cCharsWritten);

// cursor sudut kiri atas

SetConsoleCursorPosition(hCon, coordScreen);

}



int acakdata(int jml,int x[101]){

int i;



srand((unsigned)time(NULL));



for(i=0;i100 || jml


All times are GMT +7. The time now is 10:11 PM.