ANTICHAT — форум по информационной безопасности, OSINT и технологиям

#define WM_ShellNote (WM_APP + 1)
/*..............*/
LRESULT CALLBACK MyWindowProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
bool DoubleClick();
/*..............*/
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        memset(&iconData, 0, sizeof(iconData));
	iconData.cbSize			  = sizeof(NOTIFYICONDATA);
	iconData.hWnd			  = Form1->Handle;
	iconData.hIcon			  = LoadIcon(NULL, MAKEINTRESOURCE(32516));
	iconData.uID			  = 1000;
	iconData.uFlags			  = NIF_MESSAGE | NIF_ICON | NIF_TIP;

        lstrcpyn(iconData.szTip, "Всплывающее окошко\n", sizeof(iconData.szTip)/sizeof(iconData.szTip[0]));

	iconData.uCallbackMessage = WM_ShellNote;

        Shell_NotifyIconA(NIM_ADD, &iconData);
        Form1->Hide();
}
//---------------------------------------------------------------------------

LRESULT CALLBACK MyWindowProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{

        if(uMsg == WM_ShellNote && hWnd == Form1->Handle && wParam == 1)
        {
                switch((UINT)lParam)
                {
                        case WM_RBUTTONDBLCLK: return DoubleClick();
                }
        }
}

bool DoubleClick()
{
        Form1->Show();
        Shell_NotifyIconA(NIM_DELETE, &iconData);
        DestroyIcon(iconData.hIcon);
}

program lab4_11v;
uses Crt;
const a = 0;
      b = 3;
      E = 0.001;


 function arcsin(x:real):real;
 begin
  if x=1.0 then arcsin:=Pi/2.0
  else arcsin:=arctan(x/sqrt(1-x*x));
 end;

 function fpp(x:double):double;
 begin
  fpp:= x;
 end;

 function f(x:double):double;
 begin
  f:=arcsin(sqrt(x/(1+x)));
 end;

 var
  sum, h,n,M,x,Xnext,I : double;

begin
 ClrScr;
 sum:=0;

 M := 2.12132;{max|f''(x)|}

 h := sqrt( (24*E) / ((b-a)*M) );
 n := ((b-a)/h);
 writeln('h = ',h);
 writeln('n = ',n);

 n := sqrt( ((b-a)*(b-a)*(b-a)*M)/(24*E) );
 writeln('n = ',n);

 x:=a;
 repeat
 begin
  Xnext := x+h;
  sum := sum + f((x+Xnext)/2);
  x := Xnext;
 end;
 until  (Xnext<=(b-h));

 I:= sum*h;
 writeln('I = ',I);

 readln;
end.

#include<iostream>
#include<alloc.h>
#include<conio.h>
using namespace std;
int main()
{
int i,j,x;
cout<<endl<<"m=";
int m;
cin>>m;
cout<<endl<<"n=";
int n;
cin>>n;
if(m<1||n<1) return -1;
double**a=new double*[m];
for(i=0;i<m;i++)
{
a[i]=new double[n];
for(int j=0;j<n;j++)
{
cout<<"a["<<i<<"]["<<j<<"]=";
cin>>a[i][j];
   }
}
int k;
int*b=new int[m];
int min,l;
i=0;x=0;
while(i<m)
{
int min=a[i][0],max=a[i][0],l;
for(int j=1;j<n;++j)
    {
if (a[i][j]<min) min=a[i][j];
if (a[i][j]>max) max=a[i][j];
    }
    l=(2*m-i);
    b[l]=max;
    b[i]=min;
    ++i;
    }
     int p;
    for (p=0;p<m;p++){
    cout<<"b["<<p<<"]="<<b[p];}
    getch ();
    return 0;
    }