aromastil88
?>

Здравствуйте Информатика 9 класс​

Информатика

Ответы

windless-el

Вот тебе в паскале


program ryad_chisel;

var N, t:integer;

begin

read(N);

t:=(N*(N+1))div 2;

if t mod 2 =1 then writeln('IMPOSSIBLE')

else begin

     if N mod 2 =0 then begin

                        t:=N div 4;

                        repeat

                        write('+');

                        t:=t-1;

                        until t=0;

                        t:=N div 2;

                        repeat

                        write('-');

                        t:=t-1;

                        until t=0;

                        t:=N div 4;

                        repeat

                        write('+');

                        t:=t-1;

                        until t=0;

                        end

     else begin

          t:=((N+1) div 4)-1;

          repeat

          write('+');

          t:=t-1;

          until t=0;

          t:=((N-1) div 2)+1;

          repeat

          write('-');

          t:=t-1;

          until t=0;

          t:=(N+1) div 4;

          repeat

          write('+');

          t:=t-1;

          until t=0;

          end

     end    

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Здравствуйте Информатика 9 класс​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Алексеевич620
Виталий
format-l3364
info9
gymnazium
Ainura Pokhomova
purbuevat56524
T91610933073266
armusaeff
irkm8
AndreevManaeva
Дмитрий_Пергамент669
arina2403423
des-32463
fedoseevalyubov