Сумма и произведение цифр случайного трехзначного числа Число вводится с клавиатуры В...

0 голосов
38 просмотров

Сумма и произведение цифр случайного трехзначного числа Число вводится с клавиатуры В паскале сделайте пожалуйста


Информатика (42 баллов) | 38 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var a,b,c,g:integer;
Begin
readln (a);
b:=a mod 10;
a:= a div 10;
c:= a mod 10;
a:= a div 10;
g:= a mod 10;
write (b+c+g);
end.

(60 баллов)