Составить программу, которая по введенному возрасту пользователя сообщает, к какой возрастной группе он относится: до 13 лет – детство; от 14 до 24 лет – молодость; от 25 до 59 лет – зрелость; от 60 лет – старость.

Program age; var m: integer; begin readln(m); if   (m< =13) then writeln('детство'); if   (m> =14)and(m< =24) then writeln('молодость'); if   (m> =25)and(m< =59) then writeln(' зрелость'); if (m> =60) then writeln('старость') end.

Var strok: string; n,k: integer; begin writeln('введите строку'); readln(strok); writeln('с какого по счёту символа начать удаление? '); readln(n); writeln('сколько символов удалить? '); readln(k); delete(strok, n, k); writeln(strok); end.это перваяvar strok,strok2: string; n: integer; beginwriteln('введите строку'); readln(strok); writeln('с какого символа по счёту вставить строку? '); readln(n); writeln('какую строку вставить? '); readln(strok2); insert(strok2 ,strok, n); writeln(strok); end.это вторая, а третья в коментах, иначе не влезет

Вбутылке  минеральная вода.  сейчас стакан  не стоит между чаем и молоком. поставить стакан  между бутылкой с  минеральной  водой  и кружкой  нельзя,  так как тогда он будет  стоять между минеральной водой, а должен стоять рядом  с чаем и молоком. значит, стакан можно поставить  между кружкой и чашкой. стакан оказывается в середине,  значит, в нем кофе. молоко не может быть в кружке, так как по соседству с молоком будет кофе и минеральная  вода, а рядом с молоком должен быть квас. значит, молоко в чашке. так как по соседству с молоком должен быть квас,  то в кувшине квас.  ответ:   в  бутылке минеральная вода, в кружке чай, в чашке молоко,  в стакане кофе, в кувшине квас.