Курсовая работа: Перетворення чисел з однієї системи числення в іншу

#include "Unit1.h"

#include <math.h>

#include <conio.h>

#include <iostream.h>

#include <string.h>

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

//зчитуваня початкового числа

sprintf(s,"%s",Edit1->Text.c_str()); // копіюємо текст в рядок S

sscanf(s,"%s",&szInitialNumber); // зчитуємо значення із рядка S

l=strlen(s);

//зчитування початкової системи числення

sprintf(s,"%s",Edit2->Text.c_str());

sscanf(s,"%i",&InitialSystem);

//зчитування потрібної системи числення

sprintf(s,"%s",Edit3->Text.c_str());

sscanf(s,"%i",&NecessarySystem);

}

//---------------------------------------------------------------------------