Перевести код из Pascal в C++ [требует правки]
249
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;
}
-
12:23
-
20:41
-
06:31
-
21:28
-
22:18
-
08:00
-
13:46
-
10:14
-
18:32
Сборка персонального компьютера от Artline: умный выбор для современных пользователей
ТОП-10
- Почему SERVER_ADDR имеет не тот IP 49911 visits
- Как заменить $_SERVER[REMOTE_ADDR] на IP клиента в PHP за двумя Nginx? 31901 visits
- Хочу вывести несколько строк из массива в один div, выводит только много undefined; подскажите, что делать? 25874 visits
- Как через css изменить цвет png изображения? 11721 visits
- Blob video url download 11267 visits
- Php curl запрос через прокси с авторизацией 10662 visits
- Работа с captcha vk api 9470 visits
© "hostciti.net" 20.12.2025 | 00:14