Augda
5 год назад
Даю 50 поинтов!!!ИзумрудыУ царя было семь сыновей. В сундуке лежали изумруды. Пришел первый сын и взял половину того, что было. Пришел второй сын и взял половину того, что осталось и т.д. Каждый из сыновей приходил и забирал половину того, что осталось. Наконец, пришел последний, седьмой сын и увидел почти пустой сундук – с двумя последними изумрудами. Как узнать сколько изумрудов было первоначально? Составить программу (pascal). Даю 50 поинтов!!!!
ОТВЕТЫ
Чеслав
Oct 24, 2020
Var i,k: Integer;
BEGIN
k:=1;
For i:=1 to 7 dok:=k*2;
Writeln('В сундуке было ',k,' изумрудов');
END.
BEGIN
k:=1;
For i:=1 to 7 dok:=k*2;
Writeln('В сундуке было ',k,' изумрудов');
END.
757
Смежные вопросы:
