Процессор расположен на системной плате (на материнской плате).
var
a, b: <em>integer</em>;
begin
assign(input, 'input.txt');
assign(output, 'input.txt');
reset(input);
rewrite(output);
readln(input, a, b);
if (a mod 2 = 1) then
writeln(output, b mod 2)
else
writeln(output, '0');
close(input);
close(output);
end.
Интуиция мне подсказывает, что ответ номер 3
Например, я и ........... пошли .............
Var
a: array[1..10] of integer;
i: integer;
begin
for i:=1 to 10 do
a[i] := i-4;
a[2] := a[9] + a[2];
a[9] := a[2] - a[9];
a[2] := a[2] - a[9];
for i:=1 to 10 do
write(a[i], ' ');
end.