Составить программу,которая вычисляет сумму натуральных чисел от 10 до 15 и выводит на экран результат.Надо не через for i,а через while

Составить программу,которая вычисляет сумму натуральных чисел от 10 до 15 и выводит на экран результат.Надо не через for i,а через while
Гость
Ответ(ы) на вопрос:
Гость
program summa; var i,suma:integer; begin    i:=10;    while i<16 do    begin     suma:=suma+1; i:=1+i;    end; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы