В қосымшасы. Тапсырмаға арналған программа листингі

Тапсырмаға арналған программа листингі

#include<process.h>

#include<iostream.h>

#include<errno.h>

#include<string.h>

#include<conio.h>

int main(char*argv[])

{clrscr();

char ch;

cout<<"to zadach1 - 1"<<endl;

cout<<"to zadach2 - 2"<<endl;

cout<<"to zadach3 - 3"<<endl;

cout<<"to quit - q"<<endl;

cin>>ch;

while(ch!='q')

{switch(ch)

{case '1':execv("task1.exe",argv);

case '2':execv("task2.exe",argv);

case '3':execv("3.exe",argv);

case 'q':exit(1);

default:cout<<"net"<<endl;break;}}

//execv(@rever/exe@?argv)$

return 0; }

#include<iostream.h>

#include<math.h>

void main()

{float x,y;int i;

for(i=0;i<=20;i++)

{x=i*0.157;

y=sin(x);

cout<<x<<" "<<y<<endl;}

cout<<endl;

}

#include<iostream.h>

#include<math.h>

#include<iomanip.h>

void main()

{float x,y; int i;

for(i=0;i<=20;i++)

{x=i*0.157;

y=cos(x);

cout<<setw(5)<<setprecision(3)<<x<<setw(8)<<setprecision(3)<<y<<endl;}

cout<<endl;

}

Тапсырмасына программа листингі

procedure TForm1.Button4Click(Sender: TObject);

var meminfo: TmemoryStatus;

begin

meminfo.dwLength:=sizeof(meminfo);

globalmemorystatus(meminfo);

...

memo1.Lines.Add(inttostr(meminfo.dwTotalPageFile));

memo1.Lines.Add(inttostr(meminfo.dwAvailPageFile));

...

end;

end.