Const n=10; m=5; var i,j,k:integer; A:array[1..n] of integer; B,C:array[1..m] of integer; begin writeln('Введите элкменты массива'); for i:=1 to n do readln(a[i]); j:=0; k:=0; for i:=1 to n do if i mod 2=1 then begin j:=j+1; B[j]:=A[i] end else begin k:=k+1; C[k]:=A[i] end; writeln('Массив А'); for i:=1 to n do write(A[i],' '); writeln; writeln('Массив B'); for i:=1 to j do write(B[i],' '); writeln; writeln('Массив C'); for i:=1 to k do write(C[i],' '); writeln end.
Корпоративные требования к почтовой перепискеписьмо состоит из трех частей1. Обращение2. текст письма3. Подпись4. исполнитель или сотрудник для связи с полными координатами(адреса: почтовый,E-mail, IСQ,телефон) Сетевой этикет Сетево́й этике́т (сетикет, нетикет — неологизм, является слиянием слов «сеть» (англ. net) и «этикет») — правила поведения, общения в Сети, традиции и культура интернет-сообщества, которых придерживается большинство. Это понятие появилось в середине 80-х годов XX века в эхоконференциях сети FIDO. Некоторые из правил сетевого этикета присутствуют в RFC 1855 (английский вариант). Правила этикета не являются всеобщими и жестко установленными — в разных сообществах они могут значительно различаться. Так как основная цель этикета состоит в том, чтобы не затруднять общение в сообществе, правила могут устанавливаться исходя из целей сообщества, принятого стиля общения, технических ограничений, и т. д. Некоторые правила записаны, и даже оформляются в виде формального устава, а иногда и просто в виде списка, другие правила нигде не записаны, но известны большинству членов сообщества и строго соблюдаются.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку