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

Question

Информатика

Сагра

22 октября, 08:50

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

+2

Ответы (1)

Знаешь ответ?

Тролен · Answer 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