помогите решить паскаль линейная задача

Код C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#include
#include
int prog(int pro);
main()
{
int n,i;
printf("n="); scanf("%d",&n);
for(i=0;i0) return 3*prog(pro-1);
return x*3;
}