Var
a: array[1..100] of integer;
k, i, n: integer;
begin
read(n);
for i := 1 to N do
begin
A[i] := random(40) - 20;
if (a[i] mod 3 = 0) and (a[i] mod 5 > 0) then
k := k + 1;
Write(a[i], ' ');
end;
WriteLn();
WriteLn(k);
end.
Оно же на казахском!!!,не чем помочь не могу,прости)
Пусть нужно узнать, где будет напечатана строка с номером n. Для предыдущих (n - 1) строк нужно (n - 1) div k полных страниц и ещё (n - 1) mod k строк на ((n - 1) div k + 1)-ой странице. n-я строка будет следующей на этой странице.
var
n, k, fullPages, restLines: integer;
begin
write('Номер строки: ');
readln(n);
write('Строк на странице: ');
readln(k);
fullPages := (n - 1) div k;
restLines := (n - 1) mod k;
writeln('Страница: ', fullPages + 1, ', строка: ', restLines + 1);
end.
Обычно логическое или обозначают U или +, а | это штрих Шеффера.
Ну ладно, оставим это на совести авторов задачника.
Рассмотрим уравнения по порядку.
1 уравнение. c | d = 1
Это значит, что какая-то переменная, с или d, должна быть 1, а вторая может быть какой угодно. Уравнение имеет 3 решения:
1) c = 1; d = 0
2) c = 0; d = 1
3) c = 1; d = 1
2 уравнение. ~d | ~c | ~a = 1
Здесь тоже самое, одна из переменных равна 1. Решения:
1) ~d = 1 => d = 0; a и c любые - 4 решения.
2) ~c = 1 => c = 0; a и d любые - 4 решения.
3) ~a = 1 => a = 0; c и d любые - 4 решения.
3 уравнение. c & d | ~a = 1
Это более сложно. Логическое и:
c & d = 1
Это выполняется, если обе переменных равны 1. Решения такие:
1) c = 1; d = 1; ~a = 0 => a = 1
2) c = 1; d = 1; ~a = 1 => a = 0
3) ~a = 1 => a = 0; c и d любые - 4 решения.
4 уравнение.b & d = 1
Это уравнение имеет только одно решение:
b = 1; d = 1.
Теперь подставляем решение 4 уравнения в остальные уравнения.
1) b = 1; d = 1; c = 0
~d = 0; ~c = 1, 2 уравнение верное.
c & d = 0 & 1 = 0, значит ~a = 1; a = 0
a = 0; b = 1; c = 0; d = 1 - ЭТО РЕШЕНИЕ.
2) b = 1; d = 1; c = 1
~d = 0; ~c = 0, значит, ~a = 1; a = 0
c & d | ~a = 0 & 0 | 1 = 1
a = 0; b = 1; c = 1; d = 1 - ЭТО РЕШЕНИЕ.
Все, 2 решения.
4) Словесный
5) ПЛ, И2, ПЛ, И2
6) Разветвляющийся
Если правильный ответ - звучит одна музыка, не правильный - другая музыка.
Удачи!