Написать программку (PascalABC), которая получает на вход строчку, а на выходе

Написать программку (PascalABC), которая получает на вход строку, а на выходе пишет каждый знак строки в "столбик"

Задать свой вопрос
1 ответ

var s:string; i:integer;

begin

writeln('Введите строчку:');

readln(s);

for i:=1 to length(s) do writeln(s[i]);

end.


Пример:

Введите строчку:

primer

p

r

i

m

e

r

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт