Найти сумму кубов всех целых чисел из диапозона: от а до в,где а меньше либо равно в
Найти сумму кубов всех целых чисел из диапозона: от а до в,где а меньше либо равно в
Гость
Ответ(ы) на вопрос:
Гостьprogram xxx; var a, b, s, i : integer; begin write('введите а-'); readln (a); write('введите b-'); readln (b); s:=0;
for i:= a to b do
s:=s + i * sqr(i); writeln ('сумма кубов =', s) end.
Не нашли ответ?
Похожие вопросы