Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > C/C++ программирование > Общие вопросы C/C++
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.04.2012, 23:48   #1
Амелия
Пользователь
 
Регистрация: 31.03.2012
Сообщений: 11
По умолчанию программа,написанная на си++,как теперь "перевести" ее на си(просто си)

вот задание: Написать программу вывода на экран первых 25-ти членов последовательности Трибоначчи. Числа выводить столбиками, по 5 в строке. (Числа Трибоначчи — элементы числовой последовательности в которой каждое последующее число равно сумме трех предыдущих чисел.)

программа написана на си++, реально ли то что она будет работать на си? много чего надо исправить?

Код:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int i,z,x,c;
unsigned int a[25];
z=StrToInt (Edit1->Text);
x=StrToInt (Edit2->Text);
c=StrToInt (Edit3->Text);
a[1]=z;
a[2]=x;
a[3]=c;
for (int i=4; i<26; ++i)
{a[i]=a[i-1]+a[i-2]+a[i-3];



}
Label1->Caption=IntToStr (a[1]) + "," + IntToStr (a[2]) + "," + IntToStr (a[3]) + "," + IntToStr (a[4]) + "," + IntToStr (a[5]);
Label2->Caption=IntToStr (a[6]) + "," + IntToStr (a[7]) + "," + IntToStr (a[8]) + "," + IntToStr (a[9]) + "," + IntToStr (a[10]);
Label3->Caption=IntToStr (a[11]) + "," + IntToStr (a[12]) + "," + IntToStr (a[13]) + "," + IntToStr (a[14]) + "," + IntToStr (a[15]);
Label4->Caption=IntToStr (a[16]) + "," + IntToStr (a[17]) + "," + IntToStr (a[18]) + "," + IntToStr (a[19]) + "," + IntToStr (a[20]);
Label5->Caption=IntToStr (a[21]) + "," + IntToStr (a[22]) + "," + IntToStr (a[23]) + "," + IntToStr (a[24]) + "," + IntToStr (a[25]);

Последний раз редактировалось ACE Valery; 03.04.2012 в 01:45.
Амелия вне форума Ответить с цитированием
Старый 03.04.2012, 12:59   #2
LiuLiuJons
Форумчанин
 
Регистрация: 28.12.2011
Сообщений: 124
По умолчанию

Это код на си++ билдере, и реально такой код не будет работать даже на другом си++ компиляторе.
Вам нужен только этот кусок кода? Больше ничего?

Тогда вот это всё:
void __fastcall TForm1::Button1Click(TObject *Sender)
StrToInt()
Edit1->Text
Label1->Caption
IntToStr()

- билдеровское.

А вот это (кажется) исключительно для си++:
for (int i=4; i<26; ++i),
я имею ввиду введение переменной (int i) в самом блоке.
"Думай не о задаче, а о решении" (с)
LiuLiuJons вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перевести задачу из формата "Паскаль" в "Delphi7" Idma Помощь студентам 1 22.12.2011 20:56
Паскаль. 2 задачи (Программа "Верификация","КАК БРИГАДИРУ РАЗДЕЛИТЬ ЗАРОБОТАННЫЕ ДЕНЬГИ") Valik102 Помощь студентам 3 20.05.2009 20:42
две задачи(программа"верификация" , "как бригадиру разделить зароботаные деньги) Valik102 Паскаль, Turbo Pascal, PascalABC.NET 0 13.05.2009 23:32
две задачи(программа"верификация" , "как бригадиру разделить зароботаные деньги) Valik102 Паскаль, Turbo Pascal, PascalABC.NET 0 13.05.2009 18:13