x = 0
y = 6
y > 0 - да, значит y = 6 - 3 = 3, x = 0 + 3 = 3
y > 0 - да, y = 3 - 3 = 0, x = 3 + 0 = 3
0 > 0 - нет, выводим x и он равен 3
1 завдання A,B,AB,O правильна відповідь
Program _massiv;
var A:array[1..50] of real;
i,c:integer;
begin
writeln('Задайте количество членов линейного массива');
readln(c);
for i:=1 to c do begin
writeln('Введите',' ',i,' элемент массива');
readln(A[i]);
end;
for i:=1 to c do
writeln('Элемент массива ',i,' равен ',a[i]);
for i:=1 to c do
if A[i]=7.5 then writeln('Номер элемента массива, равный 7.5 ',i)
end.<span> </span>
Цифр, может быть?
для кодирования нужно 4 бита