|
Решите задачу на Pascal'e )
|
|
Воскресенье, 11.03.2012, 20:08
Пользователь
Дана строка, вывести ее зеркальное отображение.
Помогите пжлста )) |
|
Понедельник, 12.03.2012, 00:55
Проверенный
Неужели это так трудно? А что будете делать когда задачи посложнее будут? 
Держите:
Program Zerkalo;
uses crt;
var st,zst:string; i:integer;
Begin clrscr;
writeln('Input any string: ');
readln(st);
for i:=length(st) downto 1 do zst:=zst+st[i];
writeln('Output string: ');
writeln(zst);
readkey;
end. |
Пост отредактировал maxwallaby - Понедельник, 12.03.2012, 00:55 |
Мнение автора может не совпадать с его точкой зрения, потому что в действительности все не так как на самом деле...
______________________________
Решаю проблемы: Pascal/Delphi, PHP/SQL + консультации |
|
Понедельник, 12.03.2012, 01:33
Пользователь
| maxwallaby, да хреново шарю в этом ) Спасибо. |
|
