Предмет: Информатика, автор: tikano

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

Ответы

Автор ответа: regulatu
0

program summa;

var i,suma:integer;

begin

   i:=10;

   while i<16 do

   begin

    suma:=suma+1; i:=1+i;

   end;

end.

Интересные вопросы
Предмет: Русский язык, автор: vika92291