Дана строка со словами, разделёнными пробелами, в конце - точка. Удалить слово с заданным номером (Паскаль ABC)

[Margosham-k]

Дан текст . Между соседними словами - не менее одного пробела, за последним словом точка.Удалить слово с заданным номером.



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

Прошу учесть на будущее...

Модератор.

[Fiable]

Сообщение от Margosham-k

Дан текст . Между соседними словами - не менее одного пробела, за последним словом точка.Удалить слово с заданным номером.

На Java подойдет?

String s1 = "Keep your friends close but your enemies closer";
        int num, index1 = 0, index2 = 0, compt = 0;
       
        System.out.println("\n" + s1);
        Scanner sc = new Scanner(System.in);
        System.out.print("Какое слово вы хотите стереть? (Введите число) ");
        num = sc.nextInt();
        
        for(int i = 0; i < s1.length(); i++){
            if(s1.charAt(i) ==' '){
                compt = compt + 1;                
                if(compt == (num-1)){
                    index1 = i;    
                }                
                if(compt == num){
                    index2 = i;
       }    }   }        
        System.out.println(s1.substring(0, index1) + s1.substring(index2, s1.length()));

___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[Margosham-k]

неа... мне на паскале абц нуна..(

[Fiable]

Сообщение от Margosham-k

неа... мне на паскале абц нуна..(

Попробуй переделать, я с Pascal не знаком.

[Margosham-k]

уффф, спасиб те за помощь=)

[Serge_Bliznykov]

сорри за ОФФТОП

Сообщение от Margosham-k

уффф, спасиб те за помощь=)

А кто Вам виноват, если Вы не читаете правил форума (нужно указывать язык программирования), да и здравому смыслу не следуете - если Вам нужна программа на Паскаль, то почему Вы об этом прямо не сказали?!! (это риторический вопрос, отвечать на него не нужно. Просто задумайтесь в следующий раз, когда будете тему создавать)

p.s. название этой темы я исправлю так, чтобы она соответствовала правилам!

[Margosham-k]

Сообщение от Serge_Bliznykov

сорри за ОФФТОП


А кто Вам виноват, если Вы не читаете правил форума (нужно указывать язык программирования), да и здравому смыслу не следуете - если Вам нужна программа на Паскаль, то почему Вы об этом прямо не сказали?!! (это риторический вопрос, отвечать на него не нужно. Просто задумайтесь в следующий раз, когда будете тему создавать)

p.s. название этой темы я исправлю так, чтобы она соответствовала правилам!

извините пожалуйста, я учту...