Перевести код из Pascal в C++ [требует правки]

214
19 декабря 2017, 18:36

помогите перевести пожалуйста

program n2;
var
i,m,n,s,s1,x:integer;
begin
writeln('vvedit diapazon poshyky chysel');
readln(n,m);
for i:=n to m do begin
x:=i;s1:=1;
while x<>0 do begin
x:=x div 10;
s1:=s1*10;
end;
if ((sqr(i) mod s1)=i) and (i<>1) then writeln('4uslo ',i,' avtomorfne');
end;
end.
Answer 1

я только учу, но наверное как-то так

int main(){
        int i, m, n, s, s1, x;
        cout << "vvedit diapazon poshyky chysel" << endl;
        cin >> n >> m;
        for (i = n; i < m; i++) {
        x = i;
        s1 = 1;
        while (x != 0) {
            x = x / 10;
            s1 = s1 * 10;
        }
        if (int(sqrt(i)) % s1 == i && i != 1) {
            cout << "4uslo " << i << " avtomorfne";
        }
    }
    return 0;
}
READ ALSO
Ошибка с динамическим массивом char

Ошибка с динамическим массивом char

Доброго времени суток, возникла следующая проблема: Нужно возвести в степень(n>30) число xc++ я только начал изучать, не будьте слишком строги,...

297
Проверка целостности S19(SREC) файла C++

Проверка целостности S19(SREC) файла C++

У меня есть файл прошивки для контроллера в формате S19 (SREC)Как я понял внутри файла есть чексуммы

213
Сборка программы, использующей OpenSSL, для разных линуксов

Сборка программы, использующей OpenSSL, для разных линуксов

Есть кроссплатформенная программа заказчика под Window/OsX/Linux - C++/Qt/QmlС линуксами возникает проблема линковки Qt с openssl

212
Qt поэлементный скролл

Qt поэлементный скролл

Вопрос такой, есть QScrollArea с некоторым количеством кнопок на нейДля области установлен скролл через QScroller::grabGesture(viewport(), QScroller::TouchGesture); Как сделать,...

171