PascalВыделить код
1
2
3
4
5
6
7
8
9
10
11
12
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
Итоговая строка:PascalВыделить код
1
2
3
4
5
6
7
8
9
10
11
12
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
Итоговая строка:
Объяснение:
Позиционная систе́ма счисле́ния (позиционная нумерация) — система счисления, в которой значение каждого числового знака (цифры) в записи числа зависит от его позиции (разряда).
Системы счисления в культуре
Индо-арабская
Арабская
Тамильская
Бирманская
Кхмерская
Лаосская
Монгольская
Тайская
Восточноазиатские
Китайская
Японская
Сучжоу
Корейская
Вьетнамская
Счётные палочки
Алфавитные
Абджадия
Армянская
Ариабхата
Кириллическая
Греческая
Грузинская
Эфиопская
Еврейская
Акшара-санкхья
Другие
Вавилонская
Египетская
Этрусская
Римская
Дунайская
Аттическая
Кипу
Майяская
Эгейская
Символы КППУ
Позиционные
2, 3, 4, 5, 6, 8, 10, 12, 16, 20, 60
Нега-позиционная
Симметричная
Смешанные системы
Фибоначчиева
Непозиционные
Единичная (унарная)