ПОМОГИТЕ ПОЖАЛУЙСТА! ОЧЕНЬ НАДО!! PASCALCоставьте программу, позволяющую проверить,...

Question

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

Comments

паскаль?

---

да

---

ну тогда не буду писать, так как решение у Seantrex все равно верное

Answer 1

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