(x>=10) and (x<100)
Третий вариант
Var
a, b, c, t: integer;
begin
readln(a, b, c);
if c > b then begin
t := b;
b := c;
c := t;
end;
if c > a then begin
t := a;
a := c;
c := t;
end;
writeln(a + b);
end.
Ответ:
3 элемента "И": 1- (А и В), 2- (С и В), 3- выходы 1 и 2
В разветвляется на входы 1 и 2
Выключи компьютер потм включи