Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
60,111100,3c,74
один символ - один байт, значит надо кол-во бит поделить на 8:
24576 /8 = 3072 символа
var n, i, k, a: integer;
begin readln(n); k : = 0; for i : = 1 to n do begin readln(a); if trunc(sqrt(a)) * trunc(sqrt(a)) = a then k : = k + 1; end; writeln(k); end.
1)а
var a: real;
begin
readln(a);
a1 : = a*a; /получили а^2a : = a1*a1; /получили a^4
a : = a1*a*a; /получили a^(4+4+2)
writeln(a);
end.
1б)
var x: real;
i: integer;
a1 : = a*a*a; /получили а^3a : = a1*a1*a1; /получили a^9
a : = a*a1*a1; /получили а^(9+3+3)
2)
var a: real; beginreadln(a); writeln('высоты равны', a*a*sqrt(3)/4*a); writeln('радиус вписанной окружности', a*a*a/4*a*a*sqrt(3)/4); writeln('радиус описанной окружности', a*a*sqrt(3)/4*2/3*a); end.
3)var a: real; beginreadln(a);
writeln('в килобайтах' a/1024);
writeln('в мегабайтах' a/(1024*1024));
Популярные вопросы