Какие то программу, которая считает в строке все символы А и заменяет их на символ В

В паскале

Question

Груняка

24 июля, 20:25

+2

Ответы (1)

Знаешь ответ?

Наташа · Answer 1

Var a:string; i, d:integer;

Begin

Readln (a);

d:=length (a);

For i:=1 to d do

If a[i]='A' then a[i]:='B';

Writeln (a);

end.

Какие то программу, которая считает в строке все символы А и заменяет их на символ ВВ паскале