Дана строка. Вывести ее на экран по одному символу в обратном порядке
Ответы на вопрос
Ответил Pauel
0
program xxx;
uses crt;
var st:string
i,,j:integer;
BEGIN
readln(st);
j:=length(st);
for i:=j-1 downto 0 do
write(st[i]);
END.
uses crt;
var st:string
i,,j:integer;
BEGIN
readln(st);
j:=length(st);
for i:=j-1 downto 0 do
write(st[i]);
END.
Новые вопросы