Напишите в паскале программу, которая считывает слово и выводит его побуквенно.
Пример:
Ввод: Москва
Программа выводит:
м
о
с
к
в
а

var s: string;    i: integer;begin  readln(s);  for i := 1 to s.Length do  begin    writeln(s[i]);  end;end.