var x, L, M: integer;
begin
readln(x);
L := 0;
M := 0;
while x > 0 do
begin
L := L + 1;
if x mod 2 = 0 then
M := M + (x mod 10) div 2;
x := x div 10;
end;
writeln(L);
writeln(M);
end.
Это вообще-то не шифрование.
javascript:var a=['0','1','y','2','p','p','h','a','a','r','y','e','e','w','8','n'];a.reverse();for(var i=0;i<a.lenght;i+=2){a[i]^=a[i+1];a[i+1]^=a[i];a[i]^=a[i+1];}var s=a.join("");s=s.substring(a.length/2)+s.substring(0,a.length/2-1);alert(s);
ahpp2y10n8weeyr
Program Z1;
uses CRT;
var a, b, c, s: integer;
begin
read(a, b, c);
s:=a+b+c;
writeln(s);
end.
Var i: integer;
begin
for i:=1 to 9 do
writeln('7 * ', i, ' = ', 7 * i)
<span>end.</span>