Из Pascal в C++

@WeekendSeeker · Регистрация: 20.04.2013

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

Всем доброго времени суток. Вообщем передо мной встала такая задача:
Перевести эту программу из Pascal в С++ не могу разобраться с я зыком Pascal
Прошу помощи и если не сложно объясните мне начинающему программисту как?зачем?И почему ?)
Заранее огромное спасибо.

Составить программу печати всех делителей натурального числа A.

Pascal

var a,n,c,d:word;
begin { основная программа }
    readln( a );
    n:=1;
    while ( n <= sqrt(a) ) do begin
       c:=a mod n;
       d:=a div n;
       if c = 0 then begin
          writeln( n );
          if n <> d then writeln( d );
       end;
       inc( n );
    end;
end.

@WeekendSeeker · 21.04.2013, 20:49 **[ТС]**

Ладненько ) С этой получилось:

C++

#include <iostream>
#include <math.h>
int main()
{
int a,n,c,d;
std::cin >> a;
n=1;
while(n<=sqrt(a))
{
c=a%n;
d=a/n;
if(c==0)
{
std::cout<<","<<n;
if(n!=d)
{
std::cout<<","<<d;
}
}
n++;
}
return 0;
}

Теперь проблема в следующей . Но тут уже массивы которые я не понимаю...

Pascal

var a:array[1..10] of integer;
    s:longint;
    i:integer;
begin
     writeln('введите 10 элементов массива');
     s:=0;
     for i:=1 to 10 do begin
        readln( a[i] );
        s:=s+a[i];
     end;
     writeln( 'Сумма элементов массива = ', s );
end.

	21.04.2013, 20:49

Из Pascal в C++

Решение