Скорее не знаки а символы это как бы объединение букв, цифр и знаков
Var
i, n: integer;
begin
i := 1;
read(n);
repeat
i := i + 1;
if(n mod i = 0) and (n <> i) or (n = 1) then
begin
write('Число ', n, ' не является простым');
exit;
end;
until i = trunc(sqrt(n)) + 1;
write('Число ', n, ' является простым');
end.
Ща..самый крайний слева мудрунчик справа от него гануся потом олесь и крайний справа элзик
32 Кбайт=32000 байт=256000 бит=256 Кбит
F1 = ( ¬X ∨ Y ) ∧ ( ¬X ∨ ¬Y )
F2 = ( X ∨ Y ) ∧ ( ¬X ∨ Y )