Ответ: 135(10) = 207(8), фото ниже.
<span>Пользовательский интерфейс - это совокупность средств и правил взаимодействия человека и компьютера. Взаимодействие человека и компьютера в наши дни строится на основе объектно-ориентированного графического интерфейса, в котором: все объекты представляются в виде значков; оперирование объектами осуществляется в окнах; основным элементом программного управления является меню; основным элементом аппаратного управления являются различные манипуляторы. Информационное пространство пользователя - это информационные ресурсы (файлы с программами, документы, Web-сайты, фотографии, видеофрагменты и др.), доступные пользователю при работе на компьютере.</span>
Const n=10;
var a:array [1..n] of real;
i,k:integer;
b,min,s:real;
begin
for i:=1 to n do begin
a[i]:=21*random-10;
if a[i]=0 then k:=k+1;
write (a[i]:6:2);
end;
writeln;
writeln ('нулевых элементов ',k);
min:=a[1];
for i:=1 to n do
if a[i]<min then begin
k:=i;
min:=a[i];
end;
for i:=k+1 to n do
s:=s+a[i];
writeln('сумма после минимального = ',s:5:2);
for k:=1 to n do
for i:=1 to n-1 do
if abs(a[i])>abs(a[i+1]) then begin
b:=a[i];
a[i]:=a[i+1];
a[i+1]:=b;
end;
for i:=1 to n do
write (a[i]:6:2);
end.
1. Это число двузначное?
2. Это число делится на два?
3. Это число делиться на пять?
4. Это число простое?
Ну это всё что я смог придумать
:(
Max:=1; min:=1;
for k:=2 to n do begin
if a[k]>a[max] then max:=k;
if a[k] < a[min] then min:=k
end;
writeln ('max=', a[max]);
writeln ('min=', a[min]);
if max < min then writeln ('max раньше')
else writeln ('min раньше')