1) Составить программу для нахождения суммы чисел 1 сотни, которая делится на 3. (ПАСКАЛЬ)
2) Составить программу для нахождения суммы чисел от 500 до 700. (ПАСКАЛЬ)

Забыл про сумму в первом. Секунду.

Получилось, спасибо большое:) Завтра снова информатика, надеюсь, все отлично будет.

//Pascal ABC.NET v3.1 сборка 1172//1Var n,i,s:integer;beginn:=0; for i:=1 to 100 do  begin   n:=n+3;   s:=s+n;  end;writeln(s);end.//2Var i:integer; r:integer;begin for i:=500 to 700 do r:=r+i; writeln(r);end.