Пожалуйста добрые люди помогите 80б!!!Решить данную задачу на Паскале
Напишите программу, чтобы создавала палиндром любой строки. Палиндром - исходная строка + обратное представление строки (на входе – abc; на выходе abccba)

А есть какой то другой способ?

мы c downto еще не работаем

program Palindrom;var s,s1:string; i,n:integer;begin Readln(s); s1:=''; for i:=1 to Length(s) do s1:=s[i]+s1; s:=s+s1; Writeln(s)end.

спасибо))

Пожалуйста

1. Современное решение// PascalABC.NET 3.3, сборка 1625 от 17.01.2018// Внимание! Если программа не работает, обновите версию!begin  var s:=ReadlnString;  s:=s+s.Inverse;  s.Printlnend.Примерabcabccba2. Так все еще учат в большинстве (но уже не во всех!) школprogram Palindrom;var  s:string;  i,n:integer;begin  Readln(s);  for i:=Length(s) downto 1 do s:=s+s[i];  Writeln(s)end.