var
x, y: integer;
n: integer;
sum: integer;
mindif: integer;
f: text;
begin
assign(f,'C:\27-A.txt');
reset(f);
readln(f, n);
sum := 0;
mindif := 20001;
while not eof(f) do begin
readln(f, x, y);
if x > y then
sum := sum + x
else
sum := sum + y;
if (abs(x - y) < mindif) and (abs(x-y) mod 3 <> 0) then mindif := abs(x-y);
end;
if sum mod 3 <> 0 then
writeln(sum)
else
writeln(sum - mindif);
end.
Объяснение:
1) Любая информация имеет двоичную форму
2) Арифметические расчеты выполняет процессор
3) Прикладное программное обеспечение нужно для того, чтобы пользователь мог сделать что то при компьютера без программирования. Например, нарисовать картинку, решить задачу, построить график, оформить текст для печати.
4) В наше время наиболее распространены портативные персональные компьютеры
5) В состав системного блока входят: блок питания, кулер, процессор, модули оперативной памяти, видеокарта, звуковая карта, устройство для чтения дисков, постоянное запоминающее устройство.
6) Быстродействие, разрядность, величина памяти