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

Question

Информатика

Летта

20 июля, 20:10

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

+5

Ответы (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.