Question

Найти сумму натуральных чисел от 21 до D

Answer 1

var d,i: Integer;
begin
writeln('введите D:');
readln(d);
for i:=21 to d do writeln(i);
end.

Answer 2

ошибься здесь чуток.)

Answer 3

Можешь ещё помочь?