Дана строка S и число N. Преобразовать строку S в строку длины N следующим образом: если длина строки S больше N, то отбросить первые символы

@bonchik · Регистрация: 11.10.2013

Студворк — интернет-сервис помощи студентам

Дана строка S и число N. Преобразовать строку S в строку длины N следующим образом: если длина строки S больше N, то отбросить первые символы, если длина строки S меньше N, то в ее начало добавить символы "." (точка).

@ПерС · 13.11.2013, 20:17

у тебя косяк в условии - не сказано, сколько первых символов отбросить. Если предположить, что длина итоговой строки должна быть равна n, то вот так

Pascal

var s:string;
 len,i,n:integer;
begin
 write ('Введите строку:'); readln (s);
 write ('введите N:'); readln(n);
 len:=length(s);
 if len>n then s:=copy (s,len-n+1,len-n)
 else if len<n then for i:=len+1 to n do insert('.',s,1);
 writeln ('Итоговая строка: ');
 write (s);
 readln;
end.

Введите строку:qwertyuiopa
введите N:5
Итоговая строка:
uiopa

Введите строку:abrik
введите N:10
Итоговая строка:
.....abrik

собственно, сколько добавлять в начало, тоже не написано
преподам, дающим такие условия - вектор в анус

@bonchik 0 / 0 / 0 Регистрация: 11.10.2013 Сообщений: 20
		1
	Дана строка S и число N. Преобразовать строку S в строку длины N следующим образом: если длина строки S больше N, то отбросить первые символы 13.11.2013, 18:54. Показов 15145. Ответов 1 Метки нет (Все метки) Дана строка S и число N. Преобразовать строку S в строку длины N следующим образом: если длина строки S больше N, то отбросить первые символы, если длина строки S меньше N, то в ее начало добавить символы "." (точка). 0

Опции темы

Дана строка S и число N. Преобразовать строку S в строку длины N следующим образом: если длина строки S больше N, то отбросить первые символы

Решение