переведите из паскаля в С++ 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.

#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;

}