Напишите на паскале программу. дана строка длиной - вопрос №10128180 от haskaa12 05.08.2022 09:43

Question

Информатика: Напишите на паскале программу. дана строка длиной n( вводится с клавиатуры) в которой могут быть только однозначные числа включая 0 и буквы алфавита. программа заменяет в строке все строчные б на 01 а заглавные б на 101. если в строке нет таких букв то программа заменяет предпоследний символ на первый

haskaa12 · Answer

Не за что.var a,c: string; b: integer; begin write( Введите строку: ); readln(a); for b:=1 to length(a) do begin If a[b]= б then c:=c+ 01 else If a[b]= Б then c:=c+ 101 else begin a[length(a)-1] := a[1]; c:=a end end; write(c); end....