Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиПоискОблакоVK ComboВсе проекты

Напишите программу в PASCAL, используя while do

TheDaveSnork Ученик (221), на голосовании 3 недели назад
Даны действительные числа x, y. Найти сумму кубов всех целых чисел, расположенных между х и у, а также количество этих чисел.
Голосование за лучший ответ
Jurijus Zaksas Искусственный Интеллект (382218) 1 месяц назад
n = x-y+1;
s:=0;
while x<=y do
begin
s:=s+x*x*x;
inc(x);
end;
TheDaveSnorkУченик (221) 1 месяц назад
а что делать если жалуется на n?
Похожие вопросы