Подсчитать количество информации в тексте, если текст состоит из 800 символов, а мощность используемого алфавита 64 символов.

uses crt; var

  v,r,h: real; begin  write('r='); readln(r);   write('h='); readln(h);   v: =pi*sqr(r)*h;   write('v=',v); end.

#include < stdio.h> #include < stdlib.h> #include < conio.h> #include < math.h> int main(){  int x, y;   printf("\n vvedite x and y:   ");   scanf("%d" "%d", & x, & y);     if (x < y) printf("\n x = %d, y = %d", (x + y)/2, 2 * x * y);   else printf("\n x = %d, y = %d", 2 * x * y, (x + y)/2);   printf("\n\n to ");   getch( );   return 0; }