Даны два числа в десятичной системе счисления: 10 и 11. Переведите данные числа в двоичную систему счисления и перемножьте их в двоичной системе счисления.
257
324
Ответы на вопрос:
pascal
Объяснение:
var i, max, min: integer;
a: array [1..10] of integer;
begin
randomize;
for i := 1 to 10 do
begin
a[i] := random(100);
Write(a[i], ', ');
end;
WriteLn;
min := a[1];
max := a[1];
for i := 1 to 10 do
begin
if a[i] < min then min := a[i];
if a[i] > max then max := a[i];
end;
WriteLn('MAX = ', max);
WriteLn('MIN = ', min);
WriteLn('Среднее арифметическое MAX и MIN = ', (max + min) / 2:1:2);
end.
Популярно: Информатика
-
арсен15710.02.2022 06:15
-
AruzhanDias11.09.2021 05:40
-
dashamedakina31.05.2021 06:53
-
vilnur34507.02.2022 10:19
-
Hackerapo4ta11.09.2022 07:52
-
shulgavitaliy1ozo6g109.12.2021 10:53
-
Agent159703.07.2022 11:57
-
nazarpetrenko130.04.2021 08:29
-
Twister0429.10.2021 19:48
-
Виилллии20.03.2021 14:54