Помогите решить 3 (информатика)
10-11 класс
|
Я думаю что В,Б,Г,А))
Другие вопросы из категории
программу pascal, которая упорядочивает заданную последовательность по убыванию с
помощью сортировки обменами. Сортировка обменами заключается в следующем:
просматривается массив с начала и до конца, и каждый раз сравниваются два
соседних элемента A(i), и A(i+1), если A(i)<A(i+1), то они меняются местами. Просмотр массива с начала и до
конца происходит до тех пор, пока все элементы не упорядочатся.
<HTML><HEAD><META http-equiv="Content-Type"content="text/html; charset=windows-1251"><TITLE>Выравнивание и абзацы</TITLE></HEAD><BODY >
</BODY></HTML>
Уточнение<B> </B> Полужирный шрифт<I> </I> Курсив<S> </S> Зачеркнутый текст<U> </U> Подчеркивание
нужно сделать как на фото показано.
Дан массив А , содержащий N элементов .Найти произведение отрицательных элементов массива и их количество. Нарисовать блок-схему. Просчитать значения: N=10 , массив А={-2;0;10;-1;7;3;0}
любит мороженое? Сколько детей любит только мороженое?
Читайте также
Дан массив А1,.......Аn. найти максимальный и минимальный элементы и поменять их местами. Вот задача которую я делал:
program zadacha;
const
k=50;
var
a:array[1..k] of integer;
n,i:1..k;
c,v,max,min,prom:integer;
begin
for i:=1 to n do begin (здесь выскакивает ошибка о проверки диапазона)
a[i]:=random(50);
write(a[i],' ');
end;
max:=a[1];
min:=a[1];
for i:=1 to n do begin
if a[i]>max then begin
max:=a[i];
c:=i;
end;
if a[i]<min the begin
min:=a[i];
v:=i;
end;
end;
writeln('max=',max,'min=',min);
prom:=max; (вот с этой строчки и до конца помогите решить)
max:=min;
min:=prom;
writeln;
writeln('Полученный массив');
for i:=1 to n do
write(a[i], ' ');
readln;
end.
№ 1
Представьте в развернутой форме:
а) 1563; б) 100111;
№ 2.
Переведите число 67 из десятичной системы счисления в двоичную.
№ 3.
Выполните действия:
а) 11001101111 + 1110000101; б) 10111 – 10011; в) 1111 · 101.
Даю 25 баллов, но если будет решены все 10.