Program z13;
var s,l,pi:real;
r:integer;
begin
writeln('r=');
readln(r);
pi:=3.14;
s:=pi*sqr(r);
l:=2*pi*r;
writeln('s=',s,' l=',l);
readln;
end.
Var a,b,s:integer;
begin
read(a,b);
for a:=a to b do
s+=a;
writeln(s);
<span>end.</span>
1. На Америку движется два урагана, но мне кажется все жители в безопасности.
2. 1 килобайт (Кб) = 1024=2 в 10 степени байт
3. Молоко является источником кальция.
<span>Целая часть от деления Остаток от деления</span><span>12 div 2 = 6 12 mod 2 = 0</span><span>6 div 2 = 3 6 mod 2 = 0</span><span>3 div 2 = 1 3 mod 2 = 1</span><span>1 div 2 = 0 1 mod 2 = 1</span><span>Остаток от деления записываем в обратном порядке. Получаем число в 2-ой системе счисления: 1100</span>
<span>12 = 1100|2
</span><span>Для перевода дробной части числа последовательно умножаем дробную часть на основание 2. В результате каждый раз записываем целую часть произведения.
0.75*2 = 1.5 (целая часть 1)
0.5*2 = 1 (целая часть 1)
0*2 = 0 (целая часть 0)
0*2 = 0 (целая часть 0)
Получаем число в 2-ой системе счисления: 1100
0.75 = 1100|2
В итоге получаем число: 1100.1100|<span>2</span></span>
Раз массив был заявлен на 48 значений целого типа, так и будет выделено 48 ячеек памяти этого типа