Предмет:
Тип роботи:
Звіт з практики
К-сть сторінок:
55
Мова:
Українська
style="text-align: justify;">{if(I>=MAX)
{
MAX=I;
NUMBER=mas[i-1];
I=0;
}
else
{I=0;}
}
}
cout<<"NUMBER="<<NUMBER<<" MAX="<<MAX<<endl;
system("pause");
return 0;
}
Завдання 6.3
Дано дві квадратні матриці A розміром NxKMxK. Обчислити матрицю C за формулою: C = 8B *A*B - A - B4
#pragma hdrstop
#pragma argsused
#ifdef _WIN32
#include <tchar.h>
#else
typedef char _TCHAR;
#define _tmain main
#endif
#include <stdio.h>
#include "iostream.h"
#include "conio.h"
int _tmain(int argc, _TCHAR* argv[])
{
int k;
short A[100][100];
short B[100][100];
long B28[100][100];
long AB28[100][100];
long B2[100][100];
long B4[100][100];
long C[100][100];
long AB4[100][100];
cout<<"A:\n";
{for(int i=0;i<5;i++)
{
for(int j=0;j<5;j++)
{
randomize;
A[i][j]=rand()%10;
cout<<A[i][j]<<" ";
// cout<<"A["<<i<<"]["<<j<<"]=";
//cin>>A[i][j];
}cout<<endl;
} cout<<"\n";
cout<<"B:\n";
for(int i=0;i<5;i++)
{
for(int j=0;j<5;j++)
{
//cout<<"B["<<i<<"]["<<j<<"]=";
//cin>>B[i][j];
randomize;
B[i][j]=rand()%10;
cout<<B[i][j]<<" ";
}cout<<endl;
} system("pause");
}
cout<<"B2:\n";
for(int i=0;i<5;i++)
{
for(int j=0;j<5;j++)
{k=0;
for(int t=0;t<5;t++)
{
k+= B[i][t]*B[t][j];
} B2[i][j]=k; cout<< B2[i][j]<<" ";
} } cout<<endl;
cout<<"B28:\n";
for(int i=0;i<5;i++)
{
for(int j=0;j<5;j++)
{
B28[i][j]=B2[i][j]*8; cout<< B28[i][j]<<" ";
} cout<<"\n\n";
}
cout<<"AB28:\n";
for(int i=0;i<5;i++)
{
for(int j=0;j<5;j++)
{k=0;
for(int t=0;t<5;t++)
{
k+= A[i][t]*B28[t][j];
} AB28[i][j]=k; cout<< AB28[i][j]<<" ";
} cout<<endl;
}
cout<<endl;
cout<<endl;cout<<"B4:\n";
for(int i=0;i<5;i++)
{
for(int j=0;j<5;j++)
{k=0;
for(int t=0;t<5;t++)
{
k+= B2[i][t]*B2[t][j];
} B4[i][j]=k; cout<< B4[i][j]<<" ";
} cout<<endl;
}
cout<<endl; cout<<"AB2:\n";
for(int i=0;i<5;i++)
{
for(int j=0;j<5;j++)
{k=0;
for(int t=0;t<5;t++)
{
k+= A[i][t]*B4[t][j];
} AB4[i][j]=k; cout<< AB4[i][j]<<" ";
}} cout<<endl;cout<<"C:\n";
for(int i=0;i<5;i++)
{
for(int j=0;j<5;j++)
{
C[i][j]= AB28[i][j]-AB4[i][j];
cout<< C[i][j]<<" ";
} cout<<endl;
}
cout<<endl;
system("pause");
return 0;}
ПРАКТИЧНА РОБОТА 7
Програми для роботи з рядками даних
Завдання 7.1
Написати програму, яка буде виводити повідомлення в телеграфному стилі: букви повинні з’являтися по одній, з деякою затримкою.
#pragma hdrstop
#pragma argsused
#ifdef _WIN32
#include <tchar.h>
#else
typedef char _TCHAR;
#define _tmain main
#endif
#include <stdio.h>
#include "iostream.h"
#include "string.h"
#include "windows.h"
using namespace std;
int _tmain(int argc, _TCHAR* argv[])
{char ch[]="";
cout<<"St=";
gets(ch);
int n = strlen(ch);
for(int i=0;i<=n;i++)
{
cout<<ch[i]<<" ";
Sleep(200);
}cout<<"\n";
system("pause");
return 0;}
Завдання 7.2
Написати програму, яка вичислить значення виразу N1O1N2O2…OkNk, где N – ціле однорозрядне число, O – один із знаків найпростіших арифметичних дій: додавання і віднімання.
#pragma hdrstop
#pragma argsused
#ifdef _WIN32
#include <tchar.h>
#else
typedef char _TCHAR;
#define _tmain main
#endif
#include <stdio.h>
#include "iostream.h"
#include "string.h"
#include "windows.h"
using namespace std;
int _tmain(int argc, _TCHAR* argv[])
{
char St[100];
cout<<"(write number from 1 to 9 or + or -)\nSt=";
int i=0;
int n=0;
cin>>St;
n=strlen(St);
int s =atoi(&St[0]);
for(int l=1;l<=n;l++)
{
switch(St[l])
{
case'+':{s+=atoi(&St[l+1]);i++;break;}
case'-':{s-=atoi(&St[l+1]);i++;break;}
}}
cout<<"s="<<s<<endl;
system("pause");
return 0;
}
ПРАКТИЧНА РОБОТА 8
Створення інтерфейсу користувача стандартними подіями
Завдання 8.1
Використовуючи компоненти ToolBar, ControlBar, PageScroller та ActionList (або Ribbon та ActionManager) створіть текстовий редактор «WordPad».
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
#include <vcl.h>
#pragma hdrstop
#include "Urichedit.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{}
//---------------------------------------------------------------------------
/* TODO 2 -oСидоров -cКод : Главное меню */
void __fastcall TForm1::MOpenClick(TObject *Sender)
{if (OpenDialog1->Execute())
{FName = OpenDialog1->FileName;
RichEdit1->Lines->LoadFromFile(OpenDialog1->FileName);
RichEdit1->Modified = false;}}
//---------------------------------------------------------------------------
void __fastcall TForm1::MSaveAsClick(TObject *Sender)
{SaveDialog1->FileName = FName;
if (SaveDialog1->Execute())
{FName = OpenDialog1->FileName;
RichEdit1->Lines->SaveToFile(SaveDialog1->FileName);
RichEdit1->Modified = false; }}
//---------------------------------------------------------------------------
void __fastcall TForm1::MFontClick(TObject *Sender)
{FontDialog1->Font->Assign(RichEdit1->SelAttributes);
if (FontDialog1->Execute())
RichEdit1->SelAttributes->Assign(FontDialog1->Font);}
//---------------------------------------------------------------------------
void __fastcall TForm1::MNumbClick(TObject *Sender)