C++ :

#include<bits/stdc++.h>
using namespace std;
int main()
{
	int s=0,t=0;
	for(int i=50;i<=100;i++)
		s+=i;
	for(int i=100;i<=200;i++)
		t+=i;	
	cout<<s<<endl<<t;	
    return 0;
}

Pascal :

var i,s:longint;
begin
 s:=0;
 for i:=50 to 100 do
  begin
    s:=s+i;


  end;
 writeln(s);
 s:=0;
 for i:=100 to 200 do
  begin
    s:=s+i;


  end;
 writeln(s);
end.