Ответ:
2048 КБ ето 2 Мб
1Гб = 1024 Мб
Нам не нужно освобождать место!
Объяснение:
Если ти помилився и ето не КБ а Мб, то
1Гб = 1024 Мб
2048Мб = 2 Гб
16 Гб - 2 Гб =14 Гб
15,7 Гб - 14 Гб = 1,7
Ответ: нам нужно освободить 1 Гб и 700 Мб (а если бути точнее то 1Гб и 676; но пиши 1Гб и 700 Мб)
var
A: array [1..12] of integer; //Массив, состоящий из 12 целых чисел
i: integer;
begin
for i:= 1 to 12 do //Вводим элементы массива
begin
writeln('Введите А[', i, ']');
readln(a[i]);
end;
write('Исходный массив: ');
for i:= 1 to 12 do {Распечатываем исходный массив и заменяем все положительные четные элементы на 5}
begin
write(a[i], ' ');
if (a[i] > 0) and (a[i] mod 2 = 0) then
a[i]:= 5;
end;
writeln;
write('Измененный массив: ');
for i:= 1 to 12 do //Распечатываем измененный массив
write(a[i], ' ');
writeln; {Переход на новую строку, чтобы при следующем запуске программы информация выводилась с новой строки}
end.
Если все правильно, отметь решение как лучшее)
1800БАЙТ=14400БИТ
СЛ. ЗА 1 СЕКУНДУ МОЖНО ПЕРЕДАТЬ ТЕКСТ ОБЬЕМОМ 1800 БАЙТ
VAR N,a,b,c:INTEGER;
begin
Readln(n);
a:=(n mod 100)div 10;
b:=(n mod 100)mod 10;
c:=n div 100;
writeln(b,a,c);<span>
end.</span>
Маска сети может иметь максимальный формат 255.255.255.255
<span>Поэтому ответ на вопрос - 255
</span>