Программа:
var i: integer;
begin
for i:=10 to 99 do
if abs(i div 10 - i mod 10) = 3 then write(i,' ');
end.
Результат:
14 25 30 36 41 47 52 58 63 69 74 85 96
Program cos;
const
cos70=0.34202014332;
cos40=0.76604444311;
cos80=0.17364817766;
var
a:real;
begin
a:=cos70*cos40*cos80;
writeln('Ответ: ', a);
readln;
<span>end.</span>
1) На каждой странице по 62 * 36 = 2232 символов. На всех страницах -2232 * 14 = 31248. Считая, что каждый символ кодируется 1 байтом, получим, что нужно выделить 31248 б = 30,51 кб 2) 19 символов, каждый по 8 бит -152 бит (Г)
в 1бите содержится 0,000122 килобайт , ответ: 0,0266 килобайт
Объяснение:
^ знака нет, но выполняет свои действия, у себя в таблице ставьте его!