Подправить код

[werser]

Привет всем.
Очень нужна ваша помощь... Вот исходный код на паскале:

Program LAB1;
uses crt;
Procedure WriteByte(a:byte);
var i:integer;
  begin
  for i:=7 downto 0 do begin
    if ((a shr i) and $01) <>0 then write('1')
    else write('0');
    end;
  write(' ');
  end;

type  bytearr=array[1..100] of byte;
  var
  k,i:integer;
  db: double;
  px: pointer;
  bp:^bytearr;
  begin
  clrscr;
  db:=13.65;
  px:=@db;
  bp:=px;
  writeln('Tup DOUBLE. 4uslo - ',db:0:2);
  for k:=1 to 8 do writebyte(bp^[k]);
  writeln;
  readln;
  end.

Его нужно переделать под с++. Я вот тут сделал но не компилируетса... подправте что я сделал не так?

#include <stdio.h>
#include <stdlib.h>
#include <conio.h>

void WriteByte(int a)
{
int i;
   for(i=7;i==0;i--) {
    if ((a>>i)!=0)  {puts("1");}
    else puts("0");
    }
  puts(" ");
}

  void main()
  {
  int k,i;
  int bytearr[100];
  double db;
  pointer px;
  *bytearr bp;
  db=13.65;
  px=*db;
  bp=px;
  for (k=1;k==8;k++) {writebyte(bp^[k]);}
  getch();
  }

[Alt]

то я сдела не так?

Как минимум, ты оформил код тегом [quote] вместо [code]...

[Indian]

#include <stdio.h>
#include <stdlib.h>

void WriteByte (int a)
{

    int i;
    for (i = 7; i >= 0; i--)
	if ((a >> i) & 1)
	    puts ("1");
	else
	    puts ("0");

    puts (" ");
}

int main ()
{
    int k;

    char bytearr[100] = { };
    char *bp = bytearr;

    double db = 13.65;
    double *px = &db;
    bp=(char* )px;

    printf ("Tup DOUBLE. 4uslo -  %.2f \n", db);

    for (k = 0; k <= 8; k++)
		WriteByte (bp[k]);
		
	return 0;
}

[werser]

Спасибо большое
только в этом месте при компиляции

char bytearr[100] = { };

выдает ошибку Expression extended. Из-за чего это может быть?

[werser]

Спасибо большое разобрался. Спасибо приспасибо Вы меня спасли Вы супер профи.