Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
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.
1 кбайт=1024 байта
1 байт=8 бит
81920/8=10240 байт
10240/1024=10 кбайт
бег - бог - бок - бак - мак - маг -шаг
в одном байте восемь бит. следовательно 100/8=12.5 ответ 12.5
Популярные вопросы