Переделать Программу Из С++ В Паскаль

andru1312

New member
04.05.2013
0
0
#1
C++:
#include <iostream>
using namespace std;

char Bykvi(int i)
{
return static_cast<char>('a'-1+i);
}

void main()
{
const int n=3;
int i,j;
int ct=1;
unsigned int ch[n][n];
char ch2[n][n];
for(i=0;i<n;i++)
for(j=0;j<n;j++)
ch[i][j]=ct++;
for(i=0;i<n;i++)
{for(j=0;j<n;j++) 
{cout<<ch[i][j]<<" ";}
cout<<endl;}
cout<<endl;
for(i=0;i<n;i++)
{for(j=0;j<n;j++)
ch2[i][j]=Bykvi(ch[i][j]);}
for(i=0;i<n;i++)
{for(j=0;j<n;j++) 
{cout<<ch2[i][j]<<" ";}
cout<<endl;}
system("pause");
Как переделать функцию Bykvi ?