Написать программу которая находит сумму и произведение чисел от 5 до 50 с шагом 5

program space_del;var m, s: integer;p: real; //произведение очень большое, тип integer не подходитbeginm:= 0;p:= 1;repeat m:= m + 5; //числа с шагом 5 s:= s + m; //суммирование  p:= p * m; //произведение //writeln(m, \' sum = \', s, \', product = \', p); //для вывода промежуточных значений - снять // с writeln...until m = 50;writeln(\'sum = \', s, \', product = \', p);end.