Question

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

Answer 1

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