Помогите очень срочно очень!!!!!! Пожалуйста

Знания

Информатика

2 ответа:

1505ib4 года назад

0 0

прямоугольник ))))))

Афанасий44 [359K]4 года назад

0 0

Прямоугольник:)))))..........

Читайте также

Алгоритм имеющий полную и неполную формы это алгоритм

SAN

Разветвляющийся алгоритм

0 0

4 года назад

При работе с электронной таблицей в ячейку C3 записана формула:=$A4+C3. Какой вид преобрете формула,после того как ячейку C3 ско

Fadey [3]

Ответ: С2= $А3+ С2.

0 0

4 года назад

Тест по теме Команда ветвленияВопрос 1.Какие ключевые слова не используются для записи команды ветвления?elseifandthenВопрос 2.К

Татьянка 777

1) 3

0 0

4 года назад

Напишите программу в c++. Дан массив из N целых чисел. Обнулить все повторяющиеся элементы массива. Результирующий массив вывест

vipsr

n - кол-во элементов в массиве, a[] - сам массив.

Алгоритм работает в тупую за O(n²)

Вот весь алгоритм:

for (int i = 0; i < n; i++) {

for (int j = i - 1; j >= 0; j--) {

int flag = 1;

if (a[j] == a[i]) {

flag = 0;

break

}

if (flag)

a[i] = 0;

0 0

1 год назад

Напишите программу которая ищет в нем все значения равные введенному числу

Alexander1 [61]

Const n=20;
var
a:array[1..n] of integer;
i,j,t,x,i1,i2:integer;
begin
Randomize;
Writeln('Исходный массив:');
for i:=1 to n do begin
a[i]:=Random(21);
Write(a[i],' ')
end;
Writeln;
for i:=1 to n-1 do
for j:=1 to n-i do
if a[j]<a[j+1] then begin
t:=a[j];
a[j]:=a[j+1];
a[j+1]:=t
end;
Writeln('Отсортированный массив:');
for i:=1 to n do Write(a[i],' ');
Writeln;
write('x = ');
readln(x);
i1:=1;
i2:=n;
repeat
i:=(i1+i2) div 2;
if a[i]>x then i1:=(i1+i2) div 2+1;
if a[i]<x then i2:=(i1+i2) div 2-1;
until (a[i]=x)or(i1>i2);
if a[i]=x then begin
writeln('Искомый(ые) номер(а) элемента(ов):');
while (i>0)and(a[i]=x) do
i:=i-1;i:=i+1;
while (i<=n)and(a[i]=x) do begin
write(i,' '); i:=i+1; <span>end;</span>
end
else writeln('Элемент не найден');
writeln;
end.
Pascal ABC.

0 0

3 года назад