Акиндин
6 год назад
Дано двузначное число А,если А>50,то посчитать сумму чисел,иначе произведение
ОТВЕТЫ
Magdalena
Oct 24, 2020
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.
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.
848
Смежные вопросы:
