C/C++ Вопрос-Ответ

        struct { int a; int b; } the;
        the = { 7, 8 };

//-----------------------------------------
//---------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include "Unit2.h"
#include "Unit3.h"
#include "Unit4.h"
#include "Unit5.h"
#include "Unit6.h"
//---------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------
void __fastcall TForm1::openClick(TObject *Sender)
{
if(OpenDialog1->Execute()){
ClientDataSet1->Active=false;
ClientDataSet1->FileName=OpenDialog1->FileName;
ClientDataSet1->Open();
ClientDataSet1->Fields->Fields[0]->Visible=false;
}}
//---------------------------------------------------------------
void __fastcall TForm1::saveClick(TObject *Sender)
{
if(ClientDataSet1->Modified){
ClientDataSet1->Post();
}
}
//---------------------------------------------------------------
void __fastcall TForm1::optionsClick(TObject *Sender)
{
Form2->Show();
}
//---------------------------------------------------------------
void __fastcall TForm1::Exit1Click(TObject *Sender)
{
exit(1);
}
//---------------------------------------------------------------
void __fastcall TForm1::About1Click(TObject *Sender)
{
AboutBox->Show();
}
//---------------------------------------------------------------
void __fastcall TForm1::Find1Click(TObject *Sender)
{
Search->Show();
}
//---------------------------------------------------------------
void __fastcall TForm1::MTIITSClick(TObject *Sender)
{
Form5->Show();
}
//---------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Form5->Show();
Timer1->Enabled=false;
}
//---------------------------------------------------------------
void __fastcall TForm1::Close1Click(TObject *Sender)
{
if(!ClientDataSet1->Modified){
ClientDataSet1->Close();
}}
//---------------------------------------------------------------
void __fastcall TForm1::ToolButton3Click(TObject *Sender)
{
if(FontDialog1->Execute()){
Form1->Font=FontDialog1->Font;
Form2->Font=FontDialog1->Font;
Form5->Font=FontDialog1->Font;
Search->Font=FontDialog1->Font;
}}
//---------------------------------------------------------------
void __fastcall TForm1::Name1Click(TObject *Sender)
{
switch (((TMenuItem *)Sender)->Tag){
case 12: Search->RadioButton1->Checked=true;break;
case 13: Search->RadioButton2->Checked=true;break;
case 14: Search->RadioButton3->Checked=true;break;
case 15: Search->RadioButton4->Checked=true;break;
case 16: Search->RadioButton5->Checked=true;break;
case 17: Search->RadioButton6->Checked=true;break;
}
Search->Show();
}
//---------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
ClientDataSet1->IndexFieldNames="qwe";
}
//---------------------------------------------------------------
void __fastcall TForm1::ToolButton15Click(TObject *Sender)
{
if(SaveDialog1->Execute()){
ClientDataSet1->SaveToFile(SaveDialog1->FileName);
}}
//---------------------------------------------------------------
void __fastcall TForm1::CheckBox1Click(TObject *Sender)
{
if(CheckBox1->Checked){
ClientDataSet1->ReadOnly=false;
}else{
if(ClientDataSet1->Modified){
ClientDataSet1->Post();
}
ClientDataSet1->ReadOnly=true;
}
}
//---------------------------------------------------------------
 
void __fastcall TForm1::ToolButton7Click(TObject *Sender)
{
AnsiString fl,a,f,d,fll;
fl=ExtractFilePath(ExpandFileName("MKTB.exe"));
ClientDataSet1->Active=false;
ClientDataSet1->FileName=fl+"\\Listsofjeks\\jlistnatpl.xml";
//
d=ExtractFilePath(ClientDataSet1->FileName);
f=ExtractFileName(ClientDataSet1->FileName);
a=d+"tmp_"+f;
if(FileExists(a)){
DeleteFile(a);
}
ClientDataSet1->Open();
ClientDataSet1->Fields->Fields[0]->Visible=false;
ClientDataSet1->SaveToFile(a);
ClientDataSet1->FileName=a;
}
//---------------------------------------------------------------
void __fastcall TForm1::Edit2Change(TObject *Sender)
{
TLocateOptions SearchOptions;
SearchOptions << loPartialKey << loCaseInsensitive;
Form1->ClientDataSet1->Locate("Naueaei Aau,Nieaau,Aoanuiui aau",
                              Edit2->Text,SearchOptions);
}
//---------------------------------------------------------------

double  TSingFunk::Single_Sy(double Xn, double Yn, double Xk,
                             double Yk)
{
double Sy, S;
if (Xn!=Xk)
        {
        S=Xk*Xk*(2*Yk*Xk+Yn*Xk-3*Xn*Yk);
        S=S+Xn*Xn*(Xn*Yk+2*Yn*Xn-3*Yn*Xk);
        S=-S/(-Xk+Xn);
        Sy=S/6;
        }
else Sy=0;
return Sy;
}

double  TSingFunk::Single_Sy(double Xn, double Yn, double Xk,
                             double Yk)
{
double Sy, S;
if (Xn!=Xk)
        {
        S=Xk*Xk*(2*Yk*Xk+Yn*Xk-3*Xn*Yk);
        S=S+Xn*Xn*(Xn*Yk+2*Yn*Xn-3*Yn*Xk);
        S=S*(-1/6)/(-Xk+Xn);  //ec-ca yoie no?i?ee
        }
else Sy=0;
return Sy;
}

  S=S*(-1/6)/(-Xk+Xn);

double  TSingFunk::Single_Sy(double Xn, double Yn, double Xk,
                             double Yk)
{
return (Xn=Xk)?0:(Xk*Xk*(2*Yk*Xk+Yn*Xk-3*Xn*Yk)+
       Xn*Xn*(Xn*Yk+2*Yn*Xn-3*Yn*Xk))/(6*Xk-6*Xn) ;
}

     double  TSingFunk::Single_Sy(double Xn, double Yn, double Xk,
                                  double Yk)
     {
     double Sy, S;
     if (Xn!=Xk){
       S=Xk*Xk*(2*Yk*Xk+Yn*Xk-3*Xn*Yk);
       S=S+Xn*Xn*(Xn*Yk+2*Yn*Xn-3*Yn*Xk);
       S=S*(-1/6)/(-Xk+Xn);
       --- РЕЗУЛЬТАТ нигде не присваивается Sy, поэтому
       функция может возвращать непредсказуемое значение
     }else
       Sy=0;
     return Sy;
     }

     double  TSingFunk::Single_Sy(double Xn, double Yn, double Xk,
                                  double Yk)
     {
     double Sy, S;
     if (Xn!=Xk){
       S=Xk*Xk*(2*Yk*Xk+Yn*Xk-3*Xn*Yk);
       S=S+Xn*Xn*(Xn*Yk+2*Yn*Xn-3*Yn*Xk);
       Sy=S*(-1/6)/(-Xk+Xn);
       --- (-1/6) = 0, т.к. выполняется целочисленное деление; дробная
       часть отбрасывается. ну дальше все понятно.
       Последнее выражение следует писать так:
       Sy=-S/6*(Xn-Xk); -- более читабильный код
       или так
       Sy=S*(-1/6.0)/(-Xk+Xn);
       
     }else
       Sy=0;
     return Sy;
     }  

        S=-S/(-Xk+Xn);
        Sy=S/6;

        S=S*(-1/6)/(-Xk+Xn); (не работающий)

S=S*(-1/6)/(-Xk+Xn);
 1 - целое, тогда 1/6 = 0!!!

double  TSingFunk::Single_Sy(double Xn, double Yn, double Xk,
                             double Yk)
{
double Sy, S;
if (Xn!=Xk)
        {
        S=Xk*Xk*(2*Yk*Xk+Yn*Xk-3*Xn*Yk);
        S=S+Xn*Xn*(Xn*Yk+2*Yn*Xn-3*Yn*Xk);
        S=S*(-1/6)/(-Xk+Xn);  //ec-ca yoie no?i?ee
        Sy=S;
 }
else Sy=0;
return Sy;
}

double  TSingFunk::Single_Sy(double Xn, double Yn, double Xk,
                             double Yk)
{
double Sy, S;
if (Xn!=Xk)
        {
        S=Xk*Xk*(2*Yk*Xk+Yn*Xk-3*Xn*Yk);
        S=S+Xn*Xn*(Xn*Yk+2*Yn*Xn-3*Yn*Xk);
        Sy=S*(-1.0/6)/(-Xk+Xn);  //ec-ca yoie no?i?ee
        }
else Sy=0;
return Sy;
}

#include <iostream.h>
#include <stdlib.h>
#include <time.h>
#include <conio.h>
 
int main(void)
{
   randomize();
 
   cout << random(100);
 
   getch();
 
   return 0;
 
}

// crt_rand.c
/* This program seeds the random-number generator
 * with the time, then displays 10 random integers.
 */

#include <stdlib.h>
#include <stdio.h>
#include <time.h>

int main( void )
{
   int i;

   /* Seed the random-number generator with current time so that
    * the numbers will be different every time we run.
    */
   srand( (unsigned)time( NULL ) );

   /* Display 10 numbers. */
   for( i = 0;   i < 10;i++ )
      printf( "  %6d\n", rand() );
}

   19430
   28222
    9710
   12070
    7513
    9501
    1767
   26041
   11872
    4097

 //Она у тебя не работает потому что, функции int random(int) и
//randomize() взяты из паскаля, и подерживаются только борландскими
//IDE, а что-б она у тебя заработатла на VC тебе надо сделать следующее.
//
#include <stdlib.h>
#include <iostream.h>
#include <conio.h>

int main(void)
{
  cout << rand() % 100; //Вывод случайного числа от 0 до 99
  getch();
  return 0;
}

srand(time(null));
rand()%100 + 1