До собаки адресат, после собаки адрес почтового сервера
<u>// PascalABC.NET 3.3, сборка 1573 от 04.11.2017</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var s:=ReadlnString('Введите целое число:');
var n:integer;
if integer.TryParse(s,n) then Writeln('Корректно')
else Writeln('Ошибка ввода')
end.
Б. Паскаль- правильный ответ
11000(2)-23(10),18(10)-10010(2),27(10)-11011(2)