Решение задачи Integer 11

#include <stdio.h>

int main(void)
{
    int A;
    printf("A:");
    scanf ("%i", &A);

    printf("+:%i  *:%i\n",A%10+(A%100)/10+A/100,(A%10)*((A%100)/10)*(A/100));

    return 0;
}

import random

N = random.randrange(100,1000)
print("Число: ", N)
d2 = int(N/100)
d1 = int((N-d2*100)/10)
d0 = N%10
print("Сотни: ", d2)
print("Десятки: ", d1)
print("Единицы: ", d0)
print("Сумма цифр: ", d0+d1+d2)
print("Произведение цифр: ", d0*d1*d2)
									

program Integer11;
var
  A, Res: Integer;
begin
  Write('Введите трёхзначное число: ');
  Readln(A);
  Res:=(A mod 10) + ((A mod 100) div 10 )+ (A div 100);
  //*
  Writeln('Сумма цифр равна: ',Res);
  Res:=(A mod 10) * ((A mod 100) div 10) * (A div 100);
  Writeln('Произведение цифр равно: ',Res);
end.