Program primer; const n=100; var a:array[1..n] of integer; i,max:integer; begin writeln('vvedite massiv'); for i:=1 to n do readln(' ', a[i]); max:=a[1]; for i :=1 to n do if (a[i]>a[1]) and (a[i]>0) then max:=a[i]; writeln('max=',max); readln; end.
А) (11<20) И (11<10) - False(Ложь) б) (15<20) И (15<10) - False(Ложь) в) (7<20) И (7<10) - True(Истина)
Если брать за X те числа, которые допускаются в промежутке. P.S - брал рандомные значения для X, которые удовлетворяют промежутку. Под буквой В может быть и False, если поставить значение для x = 11. Получается 11<20(True) * 11<10(False). True * False = False. (Для конъюкции, т.е для логического "И") Произведение двух высказываний A,B истинно тогда, когда истины оба высказывания.
149 -- 10 100010101 - 2 225 - 8 95 - 16 Это можно сделать с калькулятора в windows, просто выбрать вид - программистский. А если учитель не принимает один ответ без решения, тогда так. Переводишь 149 в двоичное либо делением на 2 до тех пор, пока остаток от деления не будет меньше 2, получаешь 10010101, для перевода этого числа в восьмеричную делишь его на группы по три символа, начиная слева 010 010 101, если не хватило по три, добавляешь нолик слева. Переводишь каждую пару просто в десятичное, ответ будет из трех символов 2 2 5 это восьмеричная. Для шестнадцатиричной берем то же двоичное и разбиваем на группы по 4 символа справа 1001 0101, получилось 2 четверки, переводим обе в десятичную, но если при переводе получится что-то больше 9, заменяем это на букву. 10 - А, 11 - В15 - F. у нас получилось 9 5.
const n=100;
var a:array[1..n] of integer;
i,max:integer;
begin
writeln('vvedite massiv');
for i:=1 to n do
readln(' ', a[i]);
max:=a[1];
for i :=1 to n do
if (a[i]>a[1]) and (a[i]>0) then max:=a[i];
writeln('max=',max);
readln;
end.