На языку Pascal, Написать программу, которая
вычисляет суммы кубов всех чисел от 1
до 10.
272
352
Ответы на вопрос:
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.
Объяснение:
Популярно: Информатика
-
novakelizaveta7115.08.2022 15:15
-
Gromozeka120.06.2020 20:36
-
maxmxax2524527.02.2022 23:26
-
sss12624.03.2023 16:36
-
Daylidkoi13.05.2021 02:31
-
5мояоценка07.01.2020 12:55
-
Danilenok04.08.2022 00:55
-
vikioria27.05.2020 16:13
-
varvarec01.06.2020 05:14
-
Amilina1124.01.2020 16:02