Результат отработки алгоритма:
A=2
B=2
C=9
D=3
Барабан<span>: барабанная дробь, так же символ передачи информации, но уже звуковой. Это происходило в старые времена во время военных баталий, так же при военных построениях и парадах, что происходит и по сегодняшний день, барабанный дробь отбивает такт, под который маршируют солдаты.</span>
а) uses crt;
var c,d:integer;
s:real;
begin
write('Введите число с: ');
readln(c);
write('Введите число d: ');
readln(d);
s:=(power(c,3)+power(d,3))/2;
writeln('Полусумма кубов равна ',s:5:3);
end.
б) uses crt;
var a,x1,x2,x3,x4,s:integer;
begin
write('Введите четырёхзначное число: ');
readln(a);
x1:=a div 1000;
x2:= a-1000*x1;
x2:=x2 div 100;
x3:=a-1000*x1-100*x2;
x3:=x3 div 10;
x4:=a-1000*x1-100*x2-10*x3;
s:=x1*x2*x3*x4;
writeln('Произведение всех цифр в числе ',a,' равно ',s);
end.
Кодировка UNICODE 16-битная, отсюда i=16
станицы, строки и символы _ это K=5*36*75
формула количества информации: I=K*i подставляем и решаем:
I = 5*36*75*16 = 216000 бит