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

Question

Информатика

Ярополк

13 августа, 14:36

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

+2

Ответы (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.