Ответ:
var n,sum:integer;
begin
for n:=20 to 100 do begin
if(n mod 3 = 0)and((n mod 10 = 2)or
(n mod 10 = 4)or
(n mod 10 = 8))then sum:= sum + n;
end;
write(sum);
end.
Какое из всех этих? Или все сразу?
Ответ:
14
Объяснение:
а = 7
b = 4
if (если) a > b: (то выполняется) b += 5
else: (иначе (когда a <= b) выполняется) а += 7
(x += y прибавляет значение левой переменной к правой, равносильно x = x + y)
if (если) 7 > 4 (правда): (то ВЫПОЛНЯЕТСЯ) b += 5
b = b + 5 = 4 + 5 = 9
else: (иначе (когда 7 <= 4 - неправда) не выполняется) а += 7
а = 7
b = 9
if (если) a > b: (то выполняется) a += 12
else: (иначе (когда а <= b) выполняется) а += 7
(x += y прибавляет значение левой переменной к правой, равносильно x = x + y)
if (если) 7 > 9 (неправда): (то не выполняется) а += 12
else: (иначе (когда 7 <= 9 - правда) ВЫПОЛНЯЕТСЯ) а += 7
а = а + 7 = 7 + 7 = 14
а = 14
b = 9
1 бит
1 байт = 8 бит
1 Кб = 1024 байта
1 Мб = 1024 Кб
_______________
16 777 216 : 8 : 1024 : 1024 = 2 Мб
Ответ: 2 Мб