Как Строку в массив засунуть ? одна ячейка массива одна буква из строки

А зачем? Строка - тоже массив, причем динамический... Смысл какой заталкивать буквы в строку?

ну мне надо составить 2 процедуры одна меняет маленькие быквы в большие ( например : абЦд - АБЦД ) а другая имена собственные пишит с большой буквы ( например написал аНдРеЙ прога отредактировала Андрей )
а у меня стопр какой -о... незнаю с чего начать и чем закончить и как все это связать.. ((((
__

Смысл тот.. что я думал циклом могу просмотреть все буквы по одной и если она ['a'..'z'] её перевести в ASCII код и поменять эту букву на большую.

Здесь был: Модуль для работы со строками ? Особенно обрати внимание на функцию StrUpper...

функция у меня неработает
мне вот такую функцию надо самому написать ...
Можешь помочь ??

А вот с этого места - поподробнее... 250 тестов пройдено, 126 скачиваний... У всех работает, ты - особенный!!! Что значит НЕ РАБОТАЕТ. Не принимаю я таких заявлений, понимаешь? Если бы ты написал: "я ввел то-то и то-то, должно было получиться то-то и то-то, вот программа, но не работает, выдает вот это...", такое принимается. А то, как написал ты: наводит на мысль, что ты просто не пытался, и ждешь, чтобы это сделали ЗА ТЕБЯ.

Error 2 : Indentifier expected

Пытаюсь...пытался разными способами кидать все что я путался было флуудлм... извени
крч вот так... так как я думал можно сделать

Var
  c:string;
  loop : integer;
function upper(c:string):string;
begin
for loop := 1 to length© do
  begin
  if c[loop] in ['a'..'z']
        then upper := chr(ord(c[loop])-32)

        else upper := c;

  end;

end;

begin
        write('Enter a string: ');
        readln( с );
        writeln(upper(  с  );
  readln; 

из всей строки он оставляет тока последнюю букву и делает её большой !

Вопрос : Как сделать чтоб она выводила всю строку в больших буквах.
________________________________________



ТАК подходит ????

крч ... все написал я всё сам что хотел !......