Чтение книги, новая информация поступает в мозг
Делать презентацию
Отвечать урок
Var k,n,i,sum:integer;
Begin
Readln(n);
k:=1;
for i:=1 to n do
begin
sum:=sum+a;
k:=k*2
end;
Writeln('Сумма первых ',n,' слагаемых ряда равна ',sum)
End.
В одном килобайте 1024 байта
4096/1024=4
ОТВЕТ 4 килобайта
Ввод: x ^ y ^ m ^ n С/П.
Вывод: W или ошибка, если знаменатель равен 0.
П3 -> П2 -> П1 -> П0 ИП1 6 , 5 * ИП0 ИП1 3 * * + 7 ^ 9 / ИП0 * + ИП1 x^2 x^2 x#0 41 ИП2 x^2 8 ИП3 * - |x| КвКор / 1/x С/П 0 ^ 0 / С/П
Решение в прикрепленном файле. В турбо Паскале должна работать.