ТутРешу.Ру

Составить программу, которая вычисляет сумму натуральных чисел…

Задание:

Составить программу, которая вычисляет сумму натуральных чисел от 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.




Знаете другой ответ?

Отправить свой ответ