// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
Writeln(ReadlnString('n=').Count(x->x='0'),' нулей');
end.
<u><em>Тестовое решение:</em></u>
n= 5350004533300045645600
8 нулей
Размер алфавита вычисляемся по формуле:
N = 2 ^n, где n - количество бит отводимое для записи одного числа.
Найдём n и будет нам счастье.
1/128 = 2^(-7) Гб = 2^3 Мб = 2^13 Кб = 2^23 Б = 2^26 бит
Ну и n = 2^26/16*64*64 = 2^26/2^16 = 2^10 = 1024.
Ну и размер: N = 2^1024
Лучше сам/а пересчитай. Могла ошибиться, ну а логика такая
Ответ: 3)лицо, управляющее организацией работы участников локальной сети
Program chisla;
var a,b:integer;
q:real;
begin
read(a,b);
q:=(abs(a)+abs(b))/2;
writeln(q);
q:=sqrt(abs(a)*abs(b));
writeln(q);
end.
Какой именно их много и я много знаю