Ответ:
70
Объяснение:
Дано условие "не (х<=71) или (х не делится на 7)" и требуется его ложность. Добавим к нему отрицание и будем искать истинность:
не (не (х<=71) или (х не делится на 7))
По закону де-Моргана избавимся от внешнего отрицания:
(х<=71) И НЕ (х не делится на 7), что равносильно
(х<=71) И (х делится на 7)
Итак, нужно найти такое наибольшее число, которое кратно 7 и не превышает 71.
71 не кратно 7, а следующее меньшее, 70 - кратно. Это и есть ответ.
Program n1;
var a: array[1..30] of integer;
n,i: integer;
function st(i: integer): integer;
begin
st:=1;
for i:=1 to i do st:=st*2
end;
begin
readln(n);
for i:=1 to n do a[i]:=st(i);
for i:=n downto 1 do write(a[i],' ');
end.
010000001000000011010111000010 000100101100000001000100010001010110000000010 100010010110000000110010100101000100100010111
Вот так записывается: sqr(22+z)