1) Беттің өлшемдерін орнату амалы?
2) Бетке жақтаулар мен жиектер қалай орнатылады?
3) Алдын ала көру командасы қалай орындалады?
4) Құжатты баспаға басу командасы қалай орындалады?
5) Құпиясөз орнату маңызы қандай?
6) Мәтіндік процессорды қалай іске қосамыз?
7) Мәтіндік процессордың жиектерін пішімдеу қай команданың орындауымен жүзеге асады?​

Есть кнопочки антена,
Звонит в другом конце света,
Знаменитый, как айфон,
Получается ... (телефон)

Четыре ножки, одна доска,
На нём стихи пишу гордо я!
Его ставят на любой пол,
Это создание называется ... (стол)

Музыка, игры, всё, что желаешь!
Туда и мультфильмы перекачаешь,
Информационного века моды писк,
Иначе зовётся лазерный ... (диск)

Туда запишешь всё, что надо,
Мысли, уроки, рисуй что попало!
В этой брошюрке много страничек,
Что это? Правильно! ... (записная книжка)

Она кликнуть на ссылку,
Она также может скушать весь сыр!
О боже, что это? Чудище кыш!
Живёт в норе, серая ... (мышь)

Мы в понедельник туда все идём,
Много учебников туда принесём!
Наш огород знаний, она прополола,
Наша прекрасная, любимая ... (школа)

P.S. Писал сам

Var
a:array[1..10] of integer;
cnt1, cnt2, i:integer;
begin
 For i:= 1 to 10 do
   Read(a[i]);
 for i:= 1 to 5 do
  if a[i] > 0 then cnt1 := cnt1 + 1;
 for i:= 6 to 10 do
  if a[i] > 0 then cnt2 := cnt2 + 1;
 if cnt1 = cnt2 then Writeln('Количество пол-х элементов одинаково');
 if cnt1 > cnt2 then Writeln('Количество пол-х элементов больше в первой половине');
 if cnt1 < cnt2 then  Writeln('Количество пол-х элементов больше во второй половине');
end.

Пример:

-1 -2 3 5 0 4 6 7 -2 -5
Количество пол-х элементов больше во второй половине