Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Привет
Объяснение:
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.
в египетском письме было более 750 иероглифов, не было гласных. иероглифы обозначали целые слоги и звуки.
Популярные вопросы