отыскать сумму целых чисел от 1 до 200 которые кончаются на

На Паскале?

тоесть которые кратны 5:))

На каком языке?

Если число кончается на 5 или 0, то по признакам делимости оно кратно 5.

1. Неразумный школьный вариант

Перебираем все числа в заданном диапазоне и если встречаем кратное 5, прибавляем его к сумме.

var
  i,s:integer;

begin
  s:=0;
  for i:=1 to 200 do
    if i mod 5=0 then s:=s+i;
  Writeln(s)
end.

Результат:
4100

2. Более разумный школьный вариант с циклом while

Первое число, кратное 5 - это 5. А далее добавляем по 5 к сумме и ничего не необходимо инспектировать.

var
  i,s:integer;

begin
  i:=5; 1-ое подходящее число
  s:=i;
  while ilt;200 do begin
    i:=i+5;
    s:=s+i
    end;
  Writeln(s)
end.

3. Еще более разумный школьный вариант с циклом for

От предшествующего отличается способом получения подходящих чисел.
Подмечаем, что ряд 5, 10, 15, 20, ... можно получить из чисел 1, 2, 3, 4, ..., умножая их на 5. И таких чисел будет 40.

var
  i,s:integer;

begin
  s:=0;
  for i:=1 to 40 do s:=s+5*i;
  Writeln(s)
end.

4. Современный вариант на современном Паскале

Генерируем последовательность подходящих чисел и находим сумму её элементов.

// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  Range(5,200,5).Sum.Println
end.

C++
----------------------
include lt;iostreamgt;using namespace std;int main() int sum=0; for(int i=1;ilt;201;i++) if(i%5==0)sum+=i; coutlt;lt;sumlt;lt;endl; return 0;