Var i, k, n, sum: Integer;
a: Array[1..1000000] of Integer;
begin
ReadLn(n, k);
for i:=1 to n do a[i]:=i;
sum:=0;
for i:=1 to n do
if a[i] mod k = 0 then
sum:=sum+a[i];
WriteLn(sum);
end.
После слова begin:
Переменной s присвоено значение 0.
Дальше идет цикл, повторяющийся 7 раз для значений k: 6,7,8, ... ,12
При каждом проходе цикла переменная s увеличивается на 10, т.е в результате она увеличится на 7 * 10 = 70.
Т.к. в начале она была равна 0, то в конце ее значение будет 0 + 70 = 70.
Ответ во вложении. Каждая колонка с двумя парами двоичных тетрад (т.е. набор из восьми нулей и единичек) - это и есть ответ.
128гб=128.000
128.000-512= 127.488
объем жесткого диска =127.488мг
"Тачпа́д, се́нсорная пане́ль (англ. touchpad: touch — касаться, pad — подушечка) — указательное (координатное) устройство ввода, предназначенное для управления курсором и отдачи различных команд компьютеру, телефону или другому электронному оборудованию."