// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!
uses GraphABC;
begin
Draw(x->Sqrt(x),0,10)
end.
const n = 10;
var a: array [1..n] of integer;
i: integer;
begin
for i:= 1 to n do readln(a[i]);
writeln('В прямом порядке: ');
for i:= 1 to n do write(a[i],' ');
writeln;
writeln('В обратном порядке: ');
for i:= n downto 1 do write(a[i], ' ');
end.
Всех выходов ,возможных 16, но ожидаемых выходов всего лишь 4. ;
4\16 = 1\4= 25%
Const
s='Преобразование';
begin
writeln(copy(s,4,4));
<span>end.</span>
Суть шифра - заменяем букву на предыдущую по алфавиту английского языка.
Olymp
Nkxlo
Ответ: Nkxlo.