.(Найти сумму кубов всех целых чисел из диапозона: от а до в, где а меньше либо равно в).
273
389
Ответы на вопрос:
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.
Популярно: Информатика
-
lenchikkos10.02.2020 09:46
-
Azamatovna1103.03.2020 06:46
-
1Kolomiets109.05.2023 15:40
-
mamaamamma3310.05.2022 06:05
-
ГЛУПАЯДОМАШКА05.07.2022 18:43
-
yuliadruzhko05.05.2023 10:58
-
sainegorova20128.03.2021 23:17
-
samsianna200301.07.2021 15:50
-
iwcukq06.03.2022 03:00
-
Cyxapuk226.05.2020 05:53