Значение переменной j после выполнения следующего фрагмента программы равно 54
Исходный объем: 1 Мб = 1024 Кб
Статья уменьшилась на 4 * 32 * 64 = 2^2 * 2^5 * 2^6 = 2^13 cимволов, и, поскольку на каждый символ по условию отводится 2 байта, её размер уменьшился на 2 * 2^13 байт = 2^14 байт = 2^4 Кб = 16 Кб
Объём отредактированной статьи 1024 Кб - 16 Кб = 1008 Кб
Var
sum, x : integer;
begin
sum := 0;
repeat
read (x);
if (x mod 6 = 0) and (x mod 10 = 2) then sum := sum + x;
until x = 0;
write (sum);
end.
Надо поставить числа в порядке убывания, на картинке показано пошагово.
смотри описание блок схемы на картинке