Задание:
20 ∑i^2/ (10-i) 10-i написать программу для нахождения суммы
Решение:
var s: real; переменная для хранения суммы элементов i: integer; переменная для счетчикаbegin s: =0; обнуляем переменную for i: =0 downto -10 do идем с верху вниз от 0 до -10 так как по условию 10-i , до 20 s: =s+(Sqr (i) / (10-i); суммируем все в переменную s writeln ('Сумма равна=',s); выводим на экран результатend.
Знаете другой ответ?