Program Task; Var a, b, c: Integer; Begin Write('a = '); ReadLn(a); If (a < 10) Or (a > 99) Then WriteLn('Число не двузначное') Else Begin b := a Div 10; c := a - (b * 10); If b > c Then WriteLn('Первая цифра') Else if b < c Then WriteLn('Вторая цифра') Else WriteLn('Равны') End; ReadLn; End.
Я бы сделал так: Загоняем все 5 чисел в массив. Делаем сортировку. В итоге получаем, что в массиве в интервале massiv[0]..massiv[3] будут лежать минимальные числа. Берем их, суммируем, получаем минимально возможную сумму. Аналогично и с максимальной, только суммировать будем с massiv[1]..massiv[4].
Код будет примерно такой: int max_possible_sum(char *massiv[5]){ for (int i = 1; i <5; ++i) { int sum += massiv[i]; } return sum; }
Аналогично и для самой малой суммы: int min_possible_sum(char *massiv[5]){ for (int i = 0; i <4; ++i) { int sum += massiv[i]; } return sum; }
Я бы сделал так: Загоняем все 5 чисел в массив. Делаем сортировку. В итоге получаем, что в массиве в интервале massiv[0]..massiv[3] будут лежать минимальные числа. Берем их, суммируем, получаем минимально возможную сумму. Аналогично и с максимальной, только суммировать будем с massiv[1]..massiv[4].
Код будет примерно такой: int max_possible_sum(char *massiv[5]){ for (int i = 1; i <5; ++i) { int sum += massiv[i]; } return sum; }
Аналогично и для самой малой суммы: int min_possible_sum(char *massiv[5]){ for (int i = 0; i <4; ++i) { int sum += massiv[i]; } return sum; }
Var a, b, c: Integer;
Begin
Write('a = ');
ReadLn(a);
If (a < 10) Or (a > 99) Then
WriteLn('Число не двузначное')
Else
Begin
b := a Div 10;
c := a - (b * 10);
If b > c Then
WriteLn('Первая цифра')
Else if b < c Then
WriteLn('Вторая цифра')
Else
WriteLn('Равны')
End;
ReadLn;
End.