пожалуйста переведите из паскаля в С++
var a,b,c,d,s,n:integer;
begin
writeln(\'Введите 4-ехзначное число\');
readln(n);
a:= n div 1000;
b:= n mod 100 div 10 ;
c:= n mod 10 ;
d:= n div 100 mod 10;
s:=a*b*c*d;
writeln(s);
end.
var a,b,c,d,s,n:integer;
begin
writeln(\'Введите 4-ехзначное число\');
readln(n);
a:= n div 1000;
b:= n mod 100 div 10 ;
c:= n mod 10 ;
d:= n div 100 mod 10;
s:=a*b*c*d;
writeln(s);
end.
Ответ
5
(1 оценка)
1
#include <iostream>
signed main() {
setlocale(LC_ALL, "Rus");
int a, b, c, d, s, n;
std::cout << "Введите 4-ехзначное число: " << std::endl;
std::cin >> n;
a = n / 1000;
b = n % 100 / 10;
c = n % 10;
d = n / 100 % 10;
s = a * b * c * d;
std::cout << s << std::endl;
return 0;
}