Как слово "КОТ" превратить в "ТОК" в программе Паскаль?

Question

Информатика

Ярополк

14 декабря, 11:09

Как слово "КОТ" превратить в "ТОК" в программе Паскаль?

+1

Ответы (1)

Знаете ответ на вопрос?

Гелюся · Answer 1

Program p1;

var s, s1:string;

i, n:integer;

begin

s:='КОТ';

n:=length (s) ;

writeln (s) ;

for i:=1 to n do s1:=s1+copy (s, n-i+1,1) ;

writeln (s1) ;

end.