Переделать из программы Pascal в C#

Олеся Олеговна в категроии Информатика, вопрос открыт 08.11.2017 в 06:38

Задание: Шифр атбаш
const
s1='ABCDEFGHIJKLMNOPQRSTUVWXYZ';
s2='ZYXWVUTSRQPONMLKJIHGFEDCBA';
var
i,p:integer;
s:string;
begin
Write('Введите текст: '); Readln(s);
for i:=1 to Length(s) do
begin
p:=Pos(s[i],s1);
if p>0 then s[i]:=s2[p]
end;
Writeln('Результат: ',s)
end.

0 ответов

Нет результатов.
Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или  авторизируйтесь на сайте чтобы оставить ответ на вопрос.