Решите задачу на PascalABC.net; 70 баллов!!!!
Дано целое число K и текстовый файл. Удалить из каждой строки файла первые K символов(Если длина строки меньше K, то удалить из неё все символы)
Решение на PascalABC.net
Дано целое число K и текстовый файл. Удалить из каждой строки файла первые K символов(Если длина строки меньше K, то удалить из неё все символы)
Решение на PascalABC.net
More Questions From This User See All
Answers & Comments
begin
var k := ReadInteger('K =');
var a := ReadAllLines('test1.txt').Select(s -> s?[k + 1:]).ToArray;
WriteAllLines('test2.txt', a);
Print('Работа завершена')
end.