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

aynurqulieva aynurqulieva    2   24.08.2019 03:50    0

Ответы
RokkuKun RokkuKun  05.10.2020 15:56
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика