Дано предложение. вывести 'столбиком' его третий, шестой и.т.д. символ

Question

Дано предложение. вывести 'столбиком' его третий, шестой и.т.д. символ

Comments

на каком языке?

---

Паскаль

Answer 1

На pascal ABC
var i:integer;
a:string;
begin
readln(a);
i:=3;
while i<=length(a) do begin<br>writeln(a[i]);
i+=3;
end;
end.