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

Mariyamorozova4

3 часа назад

Ответы и объяснения

Я
·
новичок

Знаешь ответ? Добавь его сюда!

Var
a,b,c,sum,pr:longint
begin
read(a);
b:=a div 10;
c:=a mod 10;
sum:=b+c;
pr:=b*c;
write(sum,’ ‘,pr);
end.

0.0

0 оценок

0 оценок

ну как, помог?

Да))) Спасибо