var n : integer;
begin
readln(n);
if n mod 2 = 0 then writeln(n/2) else writeln(n*3+1);
end.
Объяснение:
пример не понятен, как у тебя получилось 11->52 ?
var n : integer;
begin
readln(n);
if n mod 2 = 0 then writeln(n/2) else writeln(n*3+1);
end.
Объяснение:
пример не понятен, как у тебя получилось 11->52 ?