Ответы на вопрос:
1байт = 8 бит. найдем сначала кол-во байт и умножим на 8. 1 кб = 2^10 байт = 1024. 1/4 кб = 1024/4=256 байт. кол-во бит = 256*8=2048 бит
//произведение двух минимальных чисел в последовательности
begin
var x: integer;
read(x);
var min1 : = maxint;
var min2 : = maxint;
repeat
if x < = min1 then
begin
min2 : = min1;
min1 : = x
end
else if x < min2 then
min2 : = x;
read(x);
until x = 0;
if (min1 < > maxint) and (min2 < > maxint) then
print(min1 * min2)
end.
Популярно: Информатика
-
makssanchuk28.11.2022 06:23
-
Kabesov02.08.2022 18:09
-
sofiotap303.04.2023 14:22
-
Matushabos26.01.2020 00:29
-
dimanyapr21.05.2021 19:08
-
Valdosta1627.12.2022 03:01
-
baharaliyeva17.07.2020 18:22
-
Александра03030720.02.2022 09:54
-
OlgaNazarenko12306.11.2022 00:20
-
elllis27.08.2022 22:30