begin writeln ('введите целое число'); readln( a ); x:=a; s:=0; while ( x<>0 ) do begin s := s + (x mod 10); x := x div 10; end;
<h3>PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var s := ReadlnString('Введите строку:');
var c := ReadlnString('Какой символ удвоить?');
s := s.Replace(c, 2 * c);
s.Println
end.
ПланшеТелефоНоутбук. Ноутбук начинается с В. Планшет с А.
Конъюнкция - логическая операция, истинная только при наборе 1 1.
Из данной таблицы истинности следует, что это инверсия конъюнкции. Следовательно, правильный ответ под буквой В.