C :

#include <stdio.h>

int main()
{
	printf("461\n");
	return 0;
}

C++ :

#include <iostream>
using namespace std;
int main()
{
     int a,b,c,count=0;
     for(a=1;a<100;a++)
         for(b=1;b<100;b++)
             for(c=1;c<100;c++)
                 if(c*5+b*2+a==100)
                 count++;
	               cout<<count<<endl;
}

Pascal :

program bhf;
var
  i,j,n,k,s,t,p:longint;
begin
  for i:=1 to 100 do
  for j:=1 to 50 do
  for k:=1 to 20 do
  if i+j*2+k*5=100 then inc(t);
  writeln(t);
end.