//Dev-C++ 5.11 (C)
float zna(float a,float b,float c)
{if(c*a-a*b==0)
{printf("An attempt to divide by zero");
return 0;}
else
return ((a*b+b*c)/(c*a-a*b));}
Var n, f, o: string; a, i: integer;
begin
write('Введите фамилию ');
Readln(f);
write('Введите имя ');
Readln(n);
write('Введите отчество ');
Readln(o);
a := length(n) + length(f) + length(o);
Writeln('Длина имени, фамилии и отчества равна ', a);
Writeln('Инициалы ', f[1], '. ', n[1], '. ', o[1], '. ');
a := 0;
for i := 1 to length(f) do
if f[i] = 'и' then a := a + 1;
Writeln('Количество букв и в фамилии ', a);
<span>end.</span>
1)32768 бит /8 (чтобы узнать сколько байтов)=4096 байт
2)4096/1024=4 килобайт
Пирамида - основание правильный многоугольник, а боковые стороны треугольники