Аватар
Информатика, опубликовано 2018-08-22 23:15:47 by Гость

Как написать на языке Паскаль общую программу "Слова-перевёртыши" а не для единичного случая?

Аватар
Ответ оставил Гость

// PascalABC.Net 3.0, сборка 1064
var
  i:integer;
  s:string;
begin
  Write(Введите строку: ); Readln(s);
  Write(Перевертыш: );
  for i:=Length(s) downto 1 do Write(s[i]);
  Writeln
end.

Тестовое решение:
Введите строку: Леша на полке клопа нашел
Перевертыш: лешан аполк еклоп ан ашеЛ

Вопрос
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.