Написать программку в паскале, используя оператор FOR . Вычислить s=(5)+(6)+(7)+...+(26)

program zz1;
var i:integer; // задаем переменную цикла целого типа
s:real; // задаем переменную суммы не целого типа
begin
for i:=5 to 26 do // организуем цикл, в котором переберем все числа от 5 до 20 6
begin
s:=s + sqrt(i); // высчитываем сумму, используя функцию квадратного корня
end;
write( приобретенная сумма = , s:5:2); // выводим ответ в формате 5 символов для всего числа и два знака после точки
end.