СТРОКИ

[vralayala]

заменить строчные буквы на заглавные и наоборот.

[Вадим Мошев]

уЖЕ ЗАМЕНИЛ. чТО ДАЛЬШЕ ДЕЛАТЬ?

[Arigato]

Сообщение от vralayala

заменить строчные буквы на заглавные и наоборот.

СТРОКИ -> строки

[vralayala]

Сообщение от vralayala

заменить строчные буквы на заглавные и наоборот.

вот кусочек а как сделать чтобы заменить большие буквы на малые?

var s:string;
    i:integer;
begin
clrscr;
write('Vvedite stroku: ');readln(s);
writeln;
for i:=1 to length(s)do
s[i]:=UpCase(s[i]);
writeln(s);
readln
end.

[Mad_Cat]

for i:=1 to length(s)do
 if s[i] in['a'..'z'] then \\для русских допилите сами
s[i]:=UpCase(s[i])
else
 if s[i] in['A'..'Z'] then 
s[i]:=LowCase(s[i]);

[BDA]

Mad_cat, lowcase, вроде, нету.

for i:=1 to length(s)do
 if s[i] in['a'..'z'] then
s[i]:=chr(ord(s[i])-32)
else
 if s[i] in['A'..'Z'] then 
s[i]:=chr(ord(s[i])+32);

[Serge_Bliznykov]

если речь идёт о TurboPascal и нужна поддержка кириллицы (русских букв),
то я рекомендую заглянуть в тему:
Pascal. Upcase