merk M merk Регистрация 16 Июл 2013 Сообщения 63 Репутация 0 Спасибо 0 Монет 0 2 Июл 2016 #1 как на паскале abc net написать программу которая выводит на экран текст наоборот
андрей14 А андрей14 Регистрация 5 Май 2013 Сообщения 78 Репутация -1 Спасибо 0 Монет 0 2 Июл 2016 #2 неччто типо принял строку вывел длинну строки for i=length; i>=0; i--){ str1+=str; } Позитивный голос 0
MrDezzyPro M MrDezzyPro Регистрация 31 Авг 2013 Сообщения 75 Репутация 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.