Program znanija3;
var i, number:integer;
begin
number:=0;
while i <> 10 do begin
Inc(number);
if (number mod 10) = 7 then begin
writeln(number);
Inc(i);
end;
end;
end.
P.S. Inc(number) = number:= number+1
Все просто.
-5 в двоичном виде 11111011
28 в двоичном виде 00011100
а теперь просто перемножаем
11111011*00011100 = 00011000 (24)
Дальше инвертируем
00011000 = 11100111 (-25)
<span>Вы решили поработать с компьютером, включили его, устроились поудобнее, но вместо приветствия увидели на экране «DISK BOOT FAILURE, INSERT SYSTEM DISK»? Это сообщение означает, что ПК не может загрузить данные с системного диска. Если эта ошибка не связана с поломкой винчестера, её можно исправить. Но иногда она возникает из-за аппаратной неисправности. В таком случае починку компьютера лучше доверить профессионалам </span>
Ответ:
1/30 часа = 2 минуты = 120 секунд
15 Кбайт = 15*2^10 байт= 15*2^13 бит
(15×2^13)/120= 5*2^11/10=2^10=1024 бит/сек