var
a:real;
begin
readln (a);
a:=trunc (a); {trunc - это такая функция (уже готовая в самой программе), которая находит целую часть числа}
writeln ('Целая часть числа а равна ',a)
end.
если я правильно понял смысл
2 и 4
4 - только если это не опечатка при создании темы. Есть тип Boolean
2) 3. В отрицании дизъюнкция меняется на конъюнкцию
А) 00000110
Б) 11111010 (не точно)
В) 10001000
Microsoft word, Microsoft office