Var x, y: real;
begin
readln(x, y);
if ((x > 0) and (y > 0)) then writeln('true') else writeln('false');
<span>end.
В первой четверти X и </span><span>Y положительны)</span>
А=J*D*t= 16*16000*30= 7680000 бит = 7680000/8=960000 байт= 960000/1024= 937,5 Кбайт
Проблема: Социальные сети отнимают много времени. Забивают голову ненужной информацией. Из-за них мы реже стали видится с друзьями, теперь на первом месте виртуальное общение. И все в таком духе
Все решается через формулы в самом ворде например 1 это сумма
40(10) = 32+8 = 2^5+2^3 = 101000(2)
В 8-разрядной ячейке: 00101000