Определите, что выведет на экран программа при вызове F(4)
procedure F(n:integer);
begin
if n>0 then begin
f(n div 4);
write(1);
f(n-3);
end;
write(2);
end;

Question

Информатика: Определите, что выведет на экран программа при вызове F(4) procedure F(n:integer); begin if n 0 then begin f(n div 4); write(1); f(n-3); end; write(2); end;

Сыймык111 · Accepted Answer

Var a: integer; begin writeln( введите год рождения ); readln(a); case a mod 12 of 0: writeln( вы родились в год обезьяны. ); 1: writeln( вы родились в год петуха. ); 2: writeln( вы родились в год собаки. ); 3: writeln( вы родились в год свиньи. ); 4: writeln( вы родились в год крысы. ); 5: writeln( вы родились в год быка. ); 6: writeln( вы родились в год тигра. ); 7: writeln( вы родились в год кролика. ); 8: writeln( вы родились в год дракона. ); 9: writeln( вы родились в год змеи. ); 10: writeln(...

Определите, что выведет на экран программа при вызове F(4)
procedure F(n:integer);
begin
if n>0 then begin
f(n div 4);
write(1);
f(n-3);
end;
write(2);
end;

Ответы на вопрос:

Популярно: Информатика

Определите, что выведет на экран программа при вызове F(4) procedure F(n:integer); begin if n>0 then begin f(n div 4); write(1); f(n-3); end; write(2); end;

Ответы на вопрос:

Популярно: Информатика

Определите, что выведет на экран программа при вызове F(4)
procedure F(n:integer);
begin
if n>0 then begin
f(n div 4);
write(1);
f(n-3);
end;
write(2);
end;