Определить сумму всех чисел оканчивающихся на 5 или 10 в диапазоне от 50 до 300. вот числа которые надо ввести в ответ: 135, 312, 310, 265, 8910, 55, 0.

Uses crt;var   n,i,summ: integer; begin      clrscr;     writeln('Введите числа: ');     readln(n);     i:=0;     for i:=50 to 300 do         begin            if i mod 5 =0  then             writeln(i);           end; end.