Собака продукты апельсин сено икра банан облако
1) Ане нравятся уроки математики и химии
2) Ане нравятся уроки химии и не нравятся - математики
3) Ане нравятся уроки математики и не нравятся - химии
4) Ане нравятся уроки математики или химии
5) Ане нравятся уроки математики или не химии
6) Ане не нравятся уроки математики или химии
7) Ане не нравятся уроки математики или химии
8) Ане не нравятся уроки математики и химии
9) Ане не нравятся уроки математики или нравятся уроки химии
Вертикаль:1.Информация.
Горизонталь:1.Редактирование.2.Фрагмент.3.Шрифт.4.Форматирование.5.Процессор
6.Фрагмент.(это не ошибка!),7.Выравнивание.8.Центрирование.
9.Копирование.10.Прямая
Ctrl+A - выделить документ целиком
Ctrl+C - копировать выделенный файл
Ctrl+X - вырезать выделенный фрагмент
Ctrl+V - вставить из буфета обмена копированный/вырезанный фрагмент
Var
a,flag,i:integer;
Begin
Readln(a);
flag:=0;
for i:=2 to a do begin
if i<>a then if a mod i=0 then
begin flag:=1; break; end; end;
if flag=1 then Writeln('NO')
else Writeln('YES')
<span>End.</span>