Программа паскаль, найдите сумму и произведение цифр числа 224 S: 3+2+4=10 p: 324=24

Question

Программа паскаль, найдите сумму и произведение цифр числа 224 S: 3+2+4=10 p: 324=24

Экономика

Программа паскаль, найдите сумму и произведение цифр числа 224 S: 3+2+4=10 p: 3*2*4=24

Гость

Ответ(ы) на вопрос:

Accepted Answer

program sumchisla;var x,a,b,c,s,p: integer;beginwriteln('Программа нахождения суммы цифр числа');writeln('Введите трехзначное число');readln(x); a:=x div 100; b:=x mod 100 div 10; c:=x mod 10; s:=a+b+c;p:=a*b*c; writeln ('s= ', s);writeln ('p= ', p); end.