Однозадачные ОС предоставляют пользователю виртуальную машину и включают средства управления файлами, периферийными устройствами и средства общения с пользователем.
Многозадачные ОС дополнительно управляют разделением между задачами совместно используемых ресурсов.
Многозадачность бывает невытесняющая (NetWare, Windows3/95/98) и вытесняющая (Windows NT, OS/2, UNIX).
В первом случае активный процесс по окончании сам передает управление ОС для выбора из очереди другого процесса.
Во втором — решение о переключении процессора с одного процесса на другой принимает ОС.
1)
var
A,s: integer;
begin
writeln ('Ведите А: ');
readln(A);
if A>30000 then
begin
writeln ('Ошибка. А больше 30000');
end
else
begin
s := 0;
while a > 0 do
begin
s := s + A mod 10;
A := A div 10;
end;
writeln(s);
end;
end.
2)
var
C,index,i: integer;
begin
writeln ('Ведите C: ');
readln(C);
if C>30000 then
begin
writeln ('Ошибка. C больше 30000');
end
else
begin
for i:=0 to C do begin
if(i mod 2) = 0 then
else begin
index:=index+1;
end
end
end;
writeln (index);
end.
Однозадачные ОС предоставляют пользователю виртуальную машину и включают средства управления файлами, периферийными устройствами и средства общения с пользователем.
Многозадачные ОС дополнительно управляют разделением между задачами совместно используемых ресурсов.
Многозадачность бывает невытесняющая (NetWare, Windows3/95/98) и вытесняющая (Windows NT, OS/2, UNIX).
В первом случае активный процесс по окончании сам передает управление ОС для выбора из очереди другого процесса.
Во втором — решение о переключении процессора с одного процесса на другой принимает ОС.
Объяснение: