Question

ПОМОГИТЕ ПОЖАЛУЙСТА! ОЧЕНЬ НАДО!! PASCAL
Cоставьте программу, позволяющую проверить, являются ли числа, находящиеся по обе стороны от заданного числа М, <близнецами>. < Близнецами> называется пара последовательных простых натуральных чисел, разность между которыми равна 2 (например 11,13)

Answer 1

var
a:longint;
begin
readln(a);
if (a+1)-(a-1)=2 then writeln('Yes') else writeln('No');
end.