1) Дано слово. Удалить его k-ый символ.

Question

Информатика

Егорыч

23 февраля, 02:23

1) Дано слово. Удалить его k-ый символ.

+1

Ответы (1)

Знаете ответ на вопрос?

Элладий · Answer 1

uses crt;

var

s: String;

k: Word;

begin

clrscr;

WriteLn ('Введите слово') ;

ReadLn (s) ;

WriteLn ('Введите номер символа, который нужно удалить') ;

ReadLn (k) ;

delete (s, k, 1) ;

WriteLn ('Вот что получилось = ', s) ;

ReadLn;

end.