Обьеденяют все компьютеры
Program z1;Var Sum, a, i:integer;BeginSum:=0;5for i:=1 to 10 do begin read(a); if (a>=5) then Sum:=Sum+a; end;writeln(Sum);end.
А) ОС - ПЕРЕДАет информацию оперативной памяти, оперативная память получает операцию и передает процессору. ПРоцессор выполняет информацию. И в зависимости какая информация показывает ее на экран......
б) работой всех устройств управляет ОС, процессор лишь выполняет команды. ПРи запуске компа, управление идет биосу, после заставки биоса, биос передает управление устройствами Операционной системе, она запускает службы и т.д..
Var a:real;
begin
readln(a);
if(a mod 2 = 0) writeln(a+30) else writeln(a*50);
end.