Program a18;
var
a,max,min,kol:integer;
begin
readln(a);
max:=a;
min:=a;
kol:=0;
while(a<>0) do begin
if(a>max) then max:=a;
if(a<min) then min:=a;
if(a>120) then inc(kol);
readln(a);
end;
writeln(max-min);
writeln(kol);
end.
111(2)=7(10)
A2(16)=162(10)
34(8)=28(10)
76(10)
Теперь ставим в порядок
111,34,76,A2
program asd;
uses crt;
var
a,b,c:integer;
begin
writeln('Введите 3 числа');
readln(a); readln(b); readln(c);
if (a<b) and (a<c) then
begin
writeln('Минимальное ', a);
end
else
begin
if (b<c) then writeln('Минимальное ', b)
else writeln('Минимальное ', c);
end;
end.
5 бит.
Фальшивых монет может быть от 0 до 16 - всего 17 вариантов. 4 бит недостаточно, т.к. 2^4 = 16 < 17; а 5 бит хватит: 2^5 = 32 > 17
IP адрес состоит из четырёх чисел через точку, каждое из которых не больше 255. Следовательно ответы A и Г - правильные.