Дано двузначное число А,если А больше 50,то посчитать сумму чисел,иначе произведение

Question

Дано двузначное число А,если А>50,то посчитать сумму чисел,иначе произведение

Гость

Ответ(ы) на вопрос:

Accepted Answer

Var A:integer; Begin Write('A = ');Read(A); if A>50 then A:=(A div 10)+(A mod 10) else A:=(A div 10)*(A mod 10); Write(A); End.