Viktoriya405
?>

Двоичный 32 – битовый интернет – адрес компьютера 01011111.10000010.00000001.01001101 представить в десятичной форме. )

Информатика

Ответы

horizma609
124.103.5.19
esnails17
Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! function sumdigs(n: integer): integer; begin   n: =abs(n); // от отрицательных чисел   result: =n mod 10;   while n> 0 do begin       n: =n div 10;       result+=n mod 10       end end; begin   var a: =readarrinteger(3);   writeln(a[a.select(t-> sumdigs(.indexmin]) end. пример 1843 9012 8562 9012 замечание: число цифр в числе может быть от 1 до 9. отрицательные числа тоже допустимы.
Feyruz90
Program z; var x: array[1..3] of integer; s,min,i_min,i: integer; begin min: =37; {начальное значение минимальной суммы выбрать больше самого большого из 4х-значных чисел 9999, т.е. 9+9+9+9=36} for i: =1 to 3 do  begin readln(x[i]); {ввести очередное число} s: =x[1] mod 10 + x[i] div 10 mod 10 + x[i] div 100 mod 10 + x[i] div 1000; {считаем сумму цифр} if s< min then begin i_min: =i; min: =s; end; {если сумма меньше текущего значения минимума, то считать эту сумму минимальной и запомнить в i_min номер текущего числа} end; writeln(x[i_min]); {вывести число с номером i_min как число с минимальной суммой его цифр} end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Двоичный 32 – битовый интернет – адрес компьютера 01011111.10000010.00000001.01001101 представить в десятичной форме. )
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Yanusik24
efimov33
annakuznetsova841
arionul-secondary2
myrisik2490
Mexx9050
Surkova_Pavlovna
Nazaruk_Kodochigov
teregorka1977205
UvarovAndrei
italiankarest
olgakozelskaa492
Евгений1286
Можарова14
denchiklo2299667