Логика такая:
1) Число 157 - это суммы 15 и 7 в порядке убывания, т.к. 1 и 57 не подойдут в виду условий задачи.
2) Пусть наименьшее число abc, тогда желательно b+c = 15, а a+b = 7.
Подберем: чтобы цифра b в нашем числе было наименьшей, цифра c должна взять на себя наибольшее значение -> 9. Тогда b = 6.
Итого: a69.
a будет 1, т.к. 1+6 = 7.
Таким числом является 169.
Проверим: 1+6 = 7. 6+9 = 15. В порядке убывания получается 157.
Например:
Звезда это О, их свойства это С
в О название звезды, в С удаленность от солнца, масса
Для представления чисел в ней используются цифры от 0 до 7.
Program n_6; var i,x,y,z:integer; m:array[1..n] of integer = (1,2,3,4,5,6,7,8,9,10); procedure nod(a,b:integer; var c:integer);
Leanne0203
Const max=10;
var ar:array[1..max]of integer;
i:byte;
procedure randomArray();
var i:byte;
begin
randomize();
for i:=1 to max do
ar[i]:=random(10,100);
end;
begin
randomArray();
for i:=1 to max do
write(ar[i],' ');
end.