Question

составьте программу которая предлагает ввести строку и выводит её на экран по одному символу в столбик
Прошу помочь, очень срочно!

Answer 1

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

Answer 2

А можно полностью расписать?)