Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Объяснение:
Вооооооооооот прости если не правильно:(
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.
2, 4, 8, 16 (двоичная (10000), четверичная (100), восьмеричная (20), шестнадцатеричная (10))
Популярные вопросы