1-B, 2-D, 3-E, 4-A, 5-C, 6-F
Хотя ответы задания у вас явно устарели: шина AGP уже не встречается на современных платах.
Var
x: real;
begin
readln(x);
if (x <= 0) then
x := 0;
writeln('y = ', x);
end.
------
Или так:
var
x: real;
begin
readln(x);
writeln('y = ', x > 0 ? x : 0);
end.
Некоторые примеры.
Непозиционная:
Унарная (единичная) система счисления.
В ее алфавите всего один символ, например [1] или [0].
<span>Позиционные:
</span>Двоичная <span>.
</span>Алфавит: [0,1]
Восьмеричная.
Алфавит: [0,1,2,3,4,5,6,7]
Шестнадцатеричная.
Алфавит: [0,1,2,3,4,5,6,7,8,9, A, B, C, D, E, F]
И т.д.
Всмысле вызначиты килькисть крейди, тут не коректне запытання
<span>не (не (не А)) = не А</span>
<span>-----------------------------------------------</span>