#include <iostream>
#include <cstring>
using namespace std;
int func(double param1)
{
  int i = 55;
  return i;
}
void main(){
 cout<< func(5);
}

Procedure TransA;
begin
for i:=1 to 3 do
for j:=1 to 3 do
At[i,j]:=A[j,i]
end;

void TransA(){
  for(i=1;i<3;i++){
     for(j:=1;j<3;j++){
        At[i][j] = A[j][i];
     }
  }
}

Function Koef(par1,par2:byte):real;
var
Sum:byte;
Tmp:real;
begin
Sum:=par1+par2;
Tmp:=1;
for k:=1 to sum do
Tmp:=Tmp*(-1);
Koef:=Tmp;
end;

double Koef(BYTE par1,par2){
       byte Sum;
       double Tmp;
       Sum = par1 + par2;
       Tmp = 1;
       for(k=1;k<Sum;k++){
           Tmp = Tmp * (-1);
       }
       return Tmp;
}