Найти сумму цифр в Паскале (используя while или repeat)
S=101+103+... +301
Составить программу.

// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018// Внимание! Если программа не работает, обновите версию!1. Современное решение (приводится в качестве контрольного примера, дающего эталон суммы).begin  Range(101,301,2).Sum.Printlnend.Результат203012. Цикл whilebegin  var (i,k,s):=(101,301,0);  while i<=k do begin s+=i; i+=2 end;  s.Printlnend.3. Цикл repeatbegin  var (i,k,s):=(101,301,0);  repeat    s+=i; i+=2  until i>k;  s.Printlnend.Результаты выполнения всех трех программ одинаковы.