C :

#include<stdio.h>
void main()
{
	int n,a,b,c,i=0;
	scanf("%d",&n);
	for(a=1;a<10*n/8;a++){
		for(b=1;b<(10*n-8*a)/2;b++){
			c=10*n-8*a-2*b;
			if(a*8+b*2+c==10*n&&a+b+c>30){
				i++;
				
			}
				
		}
	}
	printf("%d",i);
}

C++ :

#include <iostream>
#include <iomanip>
#include <cmath>

using namespace std;

int main(){
     int a,b,c,n,s=0;
     cin>>n;
     for(a=1;a<=n*10/8;a++){
   	      for(b=1;b<=n*10/2;b++){
   	    	   for(c=1;c<=n*10/1;c++){
   	    	   	    if(a*8+b*2+c*1==n*10&&a+b+c>30){
   	    	   	    	  s=s+1;
						  }
				  }
		   }
   }cout<<s<<endl;
}

Pascal :

var n,i,j,k,sum:integer;
begin
  readln(n);
  n:=n*10;
  sum:=0;
  for i:=1 to n div 8 do
    for j:=1 to n div 2 do
      begin
         k:=n-i*8-j*2;
         if (i+j+k>30) and (k>1)  then inc(sum);
      end;
writeln(sum);
end.

Java :

import java.util.Scanner;
public class Main{
	public static void main(String[] args) {
		int n=new Scanner(System.in).nextInt();
		int count=0;
		for(int i=1;i<(500/8);i++){
			for(int j=1;j<(500/2);j++){
				for(int k=1;k<500;k++){
					if((i+j+k>30)&&(10*n-8*i-2*j-k==0)){
						count++;
					}			
				}
			}	
		}
		System.out.println(count);
	}
}

Python :

s = int(input())
s = s * 10
b = 0
for i in range (1, s // 8):
   for m in range (1, s //2):
       for n in range (1, s):
         if i * 8 + 2 * m + n * 1 == s and i + m + n > 30:
            b += 1
print(b)