merk M merk Регистрация 16 Июл 2013 Сообщения 62 Репутация 0 Спасибо 0 Монет 0 2 Июл 2016 #1 как на паскале abc net написать программу которая выводит на экран текст наоборот
андрей14 А андрей14 Регистрация 5 Май 2013 Сообщения 76 Репутация -1 Спасибо 0 Монет 0 2 Июл 2016 #2 неччто типо принял строку вывел длинну строки for i=length; i>=0; i--){ str1+=str; } Позитивный голос 0
MrDezzyPro M MrDezzyPro Регистрация 31 Авг 2013 Сообщения 74 Репутация 0 Спасибо 0 Монет 0 2 Июл 2016 #3 var s:string; i:integer; begin readln(s); for i:=length(s) downto 1 do write(s); writeln; readln end. Позитивный голос 0
var s:string; i:integer; begin readln(s); for i:=length(s) downto 1 do write(s); writeln; readln end.