Program Geron;var
a, b, c, p, s: real;begin
readln(a, b, c); p := (a + b +c) / 2; s:= sqrt(p*(p - a)*(p - b)*(p -c )); writeln(s);
end.
Program Pr1;
uses crt;
var mas:array[1..10000] of integer;
i,v:integer;
Begin
clrscr;
v:=0;
for i:=1 to 10000 do mas[i]:=i;
for i:=1 to 10000 do if (mas[i] mod 13<>0) and (mas[i] mod 17<>0) then v:=v+1;
writeln(v);
end.
Мощность алфавита 64, значит для кодирования одного символа требуется 6 бит, т.к. 64 = 2^6.
Объем сообщения равен 5*6 = 30 бит
#include<bits/stdc++.h>
using namespace std;
int main(){ int min = 1000, max = 0; int a[30]; for(int i = 1; i <= 30; i++){ cin >> a[i]; if(a[i] > max) max = a[i]; if(a[i] < min) min = a[i]; } cout << min << " " << max << endl; return 0;}