напиши программу в которой будут вычеслены сумма и произведенние цифр двузначного числа

dianacat1017 dianacat1017    3   10.02.2021 10:23    0

Ответы
dreadman989 dreadman989  12.03.2021 10:38

program z;

var a, b, c, d, f:integer;

begin

writeln('Введите любое 2-ух значное число ');

readln(a);

b:=a div 10;

d:=a mod 10;

c:=b+d;

f:=b*d;

writeln('Сумма цифр равна = ' ,с);

writeln('Произведение цифр равно = ',f);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика