void __fastcall TForm1::Button1Click(TObject *Sender)
{ int biktik, taban;
float audan;
biktik=StrToInt(Edit1->Text);
taban=StrToInt(Edit2->Text);
audan=float(biktik*taban)/2;
Edit3->Text=FloatToStr(audan);
}
2-деңгей Студент пен оқытушы туралы ақпарат бере алатын қарапайым қосымша құру керек. Әрбір студент немесе оқытушы туралы ақпарат оның фамилиясына сәйкес аталатын *.txt файлда сақталсын. Қосымша құруда тізімдерді пайдаланыңыз.
Қосымша үш /2,3,4–суреттер/ терезеден тұрады. «Анықтама» терезесіндегі батырмалар көмегімен «Студенттер» немесе «Оқытушылар» терезелерінің біріне көшуге болады. Бұл терезелерде сәйкесінше студент немесе оқытушы туралы нақты мәлімет алынады.
«Анықтама» терезесі (Form1) үшін жазылған программа мәтіні:
#include "Unit1.h"
#include "Unit2.h"
#include "Unit3.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
