Question

дано натуральное число N. Определить, является ли оно простым . Составить программу на языке программирования Паскаль: Подсчитать колтчество букв "а" в заданном тексте. пожалуйста очень надо .

Answer 1

var n,i:integer;

Begin

  read(n);

  for i:= 2 to (n-1) do

    if n mod i ==0 then begin

      writeln('No');

      break;

    end;

  writeln('Yes');

End.