Var s,s1:string; i,l:integer;
Begin
s1:='';
write('Введите строку: ');readln(s);
l:=Length(s);
if l mod 4 = 0 then
Begin
For i:=l div 2+1 to l do
s1:=s1+s[i];
For i:=1 to l div 2 do
s1:=s1+s[i];
writeln('Полученная строка: ',s1);
End
else writeln('Длина строки не кратна 4');
End.

Нужно перевести в c#. Ещё лучше- visual studio с кнопками)(не обязательно)

ааа515    1   07.06.2020 01:09    0