79

Найти сумму кубов всех целых чисел из диапозона: от а до в…

ololoev 19 октября 2019

Найти сумму кубов всех целых чисел из диапозона: от а до в, где а меньше либо равнов

категория: информатика

40

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.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...