З-3 · informatik.az

Дано трехзначное целое число. Найти сумму и произведение его цифр.

Выделяем цифры и находим сумму и произведение. Отметим, в Pascal s и S – это одна и та же переменная, а в С++ это были бы разные переменные

Program A1_3;

var n,a,b,c,p,s:integer;

begin

readln(n);

a:=n mod 10;

b:=(n div 10) mod 10;

c:=(n div 100) mod 10;

s:=a+b+c;

p:=a*b*c;

writeln (s, ' ',p);

readln;

end.

//Program A1.3

#include <iostream>

using namespace std;

int main()

{ int n,a,b,c,s,p;

cin>>n;

a=n%10;

b=(n/10)%10;

c=(n/100)%10;

s=a+b+c;

p=a*b*c;

cout << s<<" "<<p << endl;

return 0;

}