4. Загрузка компьютера — это подключение компьютера к работе (каждый раз, когда вы включаете компьютер, происходит его загрузка).
Во время загрузки компьютера произошёл сбой.
5. Загрузка файла, программы — это процесс копирования файла, программы (из сети или с диска) на диск данного компьютера, чтобы он был доступен для работы.
Новая программа при загрузке может наложиться на предыдущую программу.
6. Загрузка компьютера, системы — это объём задач, выполняемых в данный момент компьютером, системой.
Сейчас нужно наметить работу, интенсивно использующую процессор, на то время, когда загрузка системы невелика.
Я не очень поняла твой вопрос, но это то что хоть как то связано со словом интернет.
А) B*B+B=B+B=B.
б) A* неА+А*неВ+В* неА+В*неВ=А*неВ+В*неА+В*неВ=А*неВ+В*неА.
в) А+неА*В+неА*С=В+А+неА*С=С+В+А
г)А*(А+В+С)=А*А+А*В+А*С=А+А*В+А*С=А+А*С=А
Program ex4;
Var
m,n:longint;
S:integer;
Begin
WriteLn('Введите целое число не равное 0');
ReadLn(n);
m:=n;
S:=0;
While m<>0 do
Begin
S:=S+(m mod 10);
m:=m div 10;
End;
WriteLn('Сумма цифр равна: ',S);
End.
Program ex4;
Var
m,n:longint;
S:integer;
Begin
WriteLn('Введите целое число не равное 0');
ReadLn(n);
m:=n;
S:=0;
While m<>0 do
Begin
S:=m mod 10;
m:=m div 10;
End;
WriteLn('Первая цифра числа: ',S);
End.
<u>// PascalABC.NET 3.3, сборка 1634 от 14.02.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var M:=ReadInteger('M=');
var (s,n):=(0,1);
while s<=M do begin
s+=n*n; n+=1
end;
Writeln('Сумма ',s)
end.
