1. с клавиатуры вводятся 2 числа. если первое число больше 5, то уменьшить второе число в 2 раза. (записать комментарий в каждой строке программы) 2. среди трех введенных целых чисел найти количество положительных.

1.var a: integer; {объявление переменных}           b: real; begin{начало   тела программы} write('введите два числа =>   '); {вывод сообщения пользователю} readln(a,b); {ввод данных пользователем} if (a> 5) then {сравнение первого введённого числа с 5} b: =b/2; {если а> 5 b приравниваем к b делённое на 2} writeln(b); {выводим b} end.{конец тела программы} 2.var a,b,c,d: integer; {объявление переменных} begin{начало тела программы} write('введите три числа  (через пробел) =>   '); {вывод информации пользователю} read(a,b,c); {ввод инф. пользователем} if (a> =0) then d: =d+1; {если а положительное число счётчик +1} if (b> =0) then d: =d+1; {тоже самое что с верху} if (c> =0) then d: =d+1; {тоже самое что с верху} writeln('количество положительных чисел  ',d); {вывод информации} end.{конец тела программы}

К материнской плате подключены все остальные устройства системного блока: через материнскую плату происходит обмен информации между устройствами, их питания электроэнергии.

Никак.........................

Я сам новичок,но думаю 1 раз