Var i:integer;
begin
i := 30;
while (i >= 1) do
begin
if (i mod 2 = 1) then
writeln(i);
i := i - 1;
end;
<span>end.
----------------
2)
var i, a: integer;
begin
for i:=0 to 30 do
if (i mod 2 = 1) then
a := a + i;
writeln(a);
end.
<span>------------
Удачи:)</span></span>
1 int = 4 bytes
178 * 4 = 712 байт.
178 - 70 = 108.
108 * 4 = 432
А вообще для этого в C/C++ есть функция sizeof :)
8*256*512 и все это разделить на 1024= 1024Кб,вроде так
Лист бумаги надо перевернуть на 180 град. Получится 98
32 символов можно закодировать 5 битами, так как 32=2^5, тоесть 1 символ = 5 бит.
В таком случае, 512 символов = 5 бита *512=2560 бита=2560/8 байта=<span>320</span><span> байта</span>