Составьте программу в pascal abc, утраивающую каждую букву в заданной строке. пример ввода: кот пример вывода :

Question

Информатика: Составьте программу в pascal abc, утраивающую каждую букву в заданной строке. пример ввода: кот пример вывода :

Эхэхэхэхэхэх · Answer

Var S,T:string;i,N:integer;beginReadln(S);N:=length(S);For i:=1 to N doT:=T+S[i]+S[i]+S[i];Writeln(T);end....