===== PascalABC.NET =====
begin
var x := 12.0;
while x <= 15.1 do
begin
var y := Sin(x) - x ** 2;
Writeln(x:4:1, y:16:9);
x += 0.2
end;
end.
Мы имеем дело с импликацией. (Г-гласные, С - согласные)
(Г+Г)->С = ¬(Г+Г)+С = ¬Г*¬Г+С
Для представленных вариантов решений подходит только второй вариант.
Ответ: 2
12211
сначала вычитаем 1 потом два раза умножаем на 3 и два раза вычитаем 1
//PascalABC.NET
//Версия 3.3, сборка 1627
begin
var a:=ReadInteger();
write( a div 100 + a mod 10);
end.