Как будет выглядеть это в си?

@Ерсултан · Регистрация: 30.10.2014

Author24 — интернет-сервис помощи студентам

Pascal

FROM inOut IMPORT Write, Writeln;
CONST N=10;
VAR i,k,r:CARDINAL;
d:ARRAY[1..N] OF CARDINAL;
BEGIN
 FOR k:=1 TO N DO
 Write(".");r:=0;
 FOR i:=1 TO k-1 DO
 r:=10*r+d[i]; d[i]:=r DIV 2; r:=r MOD 2;
 Write(CHR(d[i]+ORD("0")))
END;
d[k]:=5; Write("5"); WriteLn
END
END Power.

Ну я тут, что то набросал

C++

main()
{
  int d[n];
  int i,k,r;
  r=0;
  for(k=1,k>n,k++)
 {
   for (i=1,k-1)
   r=10*r+d[i];
   d[i]=r/2;
   r=r%2;

HighPredator · 03.11.2015, 16:17

С учетом того, насколько крив исходный сорец, выглядеть это будет так:

C

#include <stdio.h>
#include <stdint.h>
 
#define N 10
 
int main(void)
{
  uint32_t i, k, r;
  uint32_t d[N] = {0};
 
  for (k = 0; k < N; k++)
  {
    printf(".");
 
    r = 0;
 
    for (i = 0; i < k; i++)
    {
      r = 10 * r + d[i];
 
      d[i] = r / 2;
      r = r % 2;
 
      printf("%c", (char)(d[i] + '0'));
    }
 
    d[k] = 5;
 
    printf("5\n");
  }
 
  return 0;
}

@volvo · 03.11.2015, 16:31

Сообщение от HighPredator

С учетом того, насколько крив исходный сорец

Ты настолько хорошо знаешь Модулу-2, чтобы судить о том, крив или нет исходник? Не зная ни задания, ничего?

HighPredator · 03.11.2015, 16:59

volvo, я исходил из того, что автор с тегами не ошибся. Остальное, в общем не моя проблема.

@volvo Супер-модератор 32955 / 21273 / 8168 Регистрация: 22.10.2011 Сообщений: 36,542 Записей в блоге: 8
	03.11.2015, 16:31	3
	Сообщение от HighPredator С учетом того, насколько крив исходный сорец Ты настолько хорошо знаешь Модулу-2, чтобы судить о том, крив или нет исходник? Не зная ни задания, ничего? 0

HighPredator 6045 / 2160 / 753 Регистрация: 10.12.2010 Сообщений: 6,005 Записей в блоге: 3
	03.11.2015, 16:59	4
	volvo, я исходил из того, что автор с тегами не ошибся. Остальное, в общем не моя проблема. 0

Как будет выглядеть это в си?

Решение