210,220,230,240,250,260,270,280,290,300,310,320,330,340,350,360,370,380,390,400,410,420,430,440,450,460,470,480,490.
var
s: string;
i: integer;
begin
Write('s = '); Readln(s);
for i := 1 to Length(s) do
if s[i] = 'а' then s[i] := 'б';
Write(s);
Readln
end.
<span>А10=9*10^1+1*10^0+5*10^-1+3*10^-2=91.53(10)
A16=A*16^1+1*16^0+7*16^-1+5*16^2</span>=A1.75(16)
Вот держи !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
// PascalABC.NET 3.3, сборка 1600 от 23.12.2017// Внимание! Если программа не работает, обновите версию!
Ответ:
AND
Объяснение:
Можно решать с помощью таблицы истинности (см. вложение).
Требуется операция, дающая ноль при комбинациях 00, 01, 10.
Это функция AND. Она дает 1 при комбинации 11, но из таблицы истинности видно, что такой комбинации быть не может.