Есть ответ 👍

50 ! изумруды у царя было семь сыновей. в сундуке лежали изумруды. пришел первый сын и взял половину того, что было. пришел второй сын и взял половину того, что осталось и т.д. каждый из сыновей приходил и забирал половину того, что осталось. наконец, пришел последний, седьмой сын и увидел почти пустой сундук – с двумя последними . сколько изумрудов было первоначально? составить программу (pascal). 50

195
422
Посмотреть ответы 2

Ответы на вопрос:


Var  i,k: integer; begin k: =1; for i: =1 to 7 dok: =k*2; writeln('в сундуке было ',k,' изумрудов'); end.

Var s1, s2: string; i: integer; begin readln(s1); for i: =1 to length(s1) do if s1[i] in ['0'..'9'] then s2 : = s2 + s1[i]; writeln(s2); end.

Популярно: Информатика