Программирование, язык Turbo Pascal.
Ввести строку с клавиатуры. Заменить все вхождения буквы "а" (рус и англ) на пробел. Через функцию copy
Ответы
Ответ дал:
0
Тут не нужна Copy! Абсолютно не нужна. Ей не пользуются для замены символа в строке.
var
s:string;
i,n,p:integer;
begin
Readln(s);
n:=Length(s);
for i:=1 to n do
if (s[i]='a') or (s[i]='а') then s[i]:=' ';
Writeln(s);
Readln
end.
var
s:string;
i,n,p:integer;
begin
Readln(s);
n:=Length(s);
for i:=1 to n do
if (s[i]='a') or (s[i]='а') then s[i]:=' ';
Writeln(s);
Readln
end.
kalantiya:
Нам было сказано сделать через copy
Вас заинтересует
5 месяцев назад
1 год назад
1 год назад
2 года назад
2 года назад