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
Итоговая строка:
Прежде всего убедитесь, что аппаратная клавиша включения Wi-Fi адаптера, активна, если она есть на вашем ноутбуке. Если нет , то посмотрите на клавиши F1-F12. Одна из них будет с изображением антенны. Нажмите эту кнопку в сочетании с Fn. Теперь Wi-Fi должен включиться.
Если после этого Wi-Fi не заработал, то стоит проверить включено ли "Беспроводное сетевое соединение" в настройках Windows. Для этого необходимо нажать правой кнопкой мыши на значок сети в правом нижнем углу экрана и выбрать "Центр управления сетями и общим доступом". Далее нажать "Изменение параметров адаптера".
Объяснение:
❤
