Paskal abc заменить в строке все буквы а ** буквы б

0 голосов
105 просмотров

Paskal abc заменить в строке все буквы а на буквы б


Информатика (28 баллов) | 105 просмотров
0

И где искать эту среду, если проект с 2007 года закрыт?

0

просто в паскале

0

Паскалей много разных.

0

В Pascal ABC язык Turbo Pascal

0

да на нем

Дан 1 ответ
0 голосов

var

 s: string;

 i: integer;

begin

 Write('s = '); Readln(s);

 for i := 1 to Length(s) do

   if s[i] = 'а' then s[i] := 'б';

 Write(s);

 Readln

end.

(2.5k баллов)
0

вроде должно работать в турбо-паскале, не не точно =)