Программка Delphi - надо вывести в строку все простые натуральные числа, которые меньше задаваемого трехзначного N

[Наталья30111992]

Ребят, помогите пожалуйста написать простенькую программу. надо вывести в строку все простые натуральные числа,которые меньше задаваемого трехзначного N. посчитать их кол-во и сумму.
заранее благодарна
По нажатии кнопки происходят все вычисления. но что-то накрутила с переменными, кажется там есть лишние. и как правильно вывести простые числа в строку подряд?

int a,b,Sum,c,d,n,kol;


void __fastcall TForm1::Button1Click(TObject *Sender)
{
n=StrToInt(Edit1->Text);
kol=0;
Sum=0;
for(a=3; a<=n; a++)
{
c=a/2;
int d=0;

for(b=2; b<=c; b++)
if ((a%b)==0)
{
d++;
break;
}
if (d==0)
{
Sum=Sum+a;
kol++;
if ((kol>0) && ((kol%10)==0))
 ;
}
}Label1->Caption=IntToStr(kol);
Label2->Caption=IntToStr(Sum);
}

//---------------------------------------------------------------------------



___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE]
(кнопочка на панели форматирования с решёточкой #)
Не забывайте об этом!

Модератор.

[Vanta11a]

Какой нафиг делфи, если это чистый С++?
Правильно вывести так: завести строку, и при нахождении простого числа тупо плюсовать в неё это число

str_result += IntToStr(chislo);