Предмет: Информатика,
автор: karnavalov244
На языку Pascal, Написать программу, которая
вычисляет суммы кубов всех чисел от 1
до 10.
Ответы
Автор ответа:
0
Ответ:
program p1;
var a:integer;
begin
a:= (1*1*1)+(2*2*2)+(3*3*3)+(4*4*4)+(5*5*5)+(6*6*6)+(7*7*7)+(8*8*8)+(9*9*9)+(10*10*10);
writeln(a);
end.
Объяснение:
karnavalov244:
надеюсь это правильно )
Интересные вопросы
Предмет: Українська мова,
автор: Аноним
Предмет: Русский язык,
автор: plkvich691
Предмет: Английский язык,
автор: 123vik
Предмет: История,
автор: zorinaolya