Var sum,pr,i: integer; begin pr: =1; for i: =-5 to 5 do begin if (i> 0) then pr: =pr*i else sum: =sum+i; end; writeln('сумма отрицательных чисел = ',sum); writeln(''произведение положительных чисел = ',pr); end.
zdanovich90764
16.08.2022
Ip 217.13.163.133 маска 255.255.252.0 переводим в двоичный код и поразрядно умножим ip 11011 001. 00001101.10100011.10000101 маска 11111111.11111111.11111100.00000000 10100000 этот третий байт переводим в дес.сист.счисл итого: 217.13.160.0
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Придумай і запиши запитання, на яке тобі ніхто не відповість (так)