3 кбайта, 4096 символов
В одном символе 3 кбайта / 4096 символов
3072 байта / 4096 символов
24 576 бит / 4096 символов = 6 бит на один символ
Воспользуемся формулой N = 2^i
2^6 = 64 символов в алфавите
Ответ: 64
function myFunction(x: real):real;
begin
if (x>=-10) and (x<2) then
myFunction:=sqr(x)+4*x-7 else
if ((x<-10) and (x<>0)) or (x>=2) then
myFunction:=1/(sqr(x)+4*x-7);
end;
var x,y: real;
begin
write('Введите x: ');
readln(x);
y:=myFunction(x);
writeln('y = ',y);
end.
var
a : integer;
begin
readln (a);
if a > 0 then
a := a +1;
if a <0 then
a := a-2
if a= 0 then
a := 10;
writeln (a);
end.
C++
#include <iostream>
using namespace std;
int main() {
int a = 7;
int b = 2;
int m;
m = a;
a = b;
b = m;
cout << "a = " << a << "\n";;
cout << "b = " << b << "\n";
return 0;
}
program q;
var
a: integer;
b: real;
begin
b := 0;
read(a);
b := (a div 10 + a mod 10) / 2;
writeln(b);
end.
На Pascal'e
*Проверил*