Как сделать так что бы программа выводила наименьшее число? var a, b, c: integer; d: array [1..10] of integer; begin for b : = 1 to 10 do begin write('bведите число ', b, ' '); d[b] : = random(100) + 100; writeln(d[b]: 4); end; b : = d[1]; c : = 1; for b : = 2 to 10 do begin if d[b]> a then begin a : = d[b]; c : = b; end; end; write('самое большое число под номером ', c, ' это число ', a); end.

👇

Ответ:

aki4

30.05.2022

Вар, б, в: целое;г: массив [1 .. 10] из целого;начинатьдля Ъ: = 1 до 10 сделатьначинатьнаписать ('Bведите число', Ь, '');D [B]: = случайных (100) + 100;WriteLn (г [б]: 4);конец;б: = D [1];с: = 1;для Ъ: = 2 до 10 сделатьначинатьесли г [б]> тоначинать: = D [б];с: = б;конец;закончить;написать ('Самое большое число под номером', с, 'это число',);конец.

4,6(7 оценок)

Открыть все ответы

Ответ:

Мария55445

30.05.2022

Const
nn = 50;
var
a,b,nb:array[1..nn] of integer;
i,n,j: integer;
begin
Write('Введите количество элементов в массиве (n<51): ');
Read(n);
Writeln('Вводите элементы массива');
j:=0;
for i:=1 to n do
begin
    Read(a[i]);
    if a[i]<0 then begin Inc(j); b[j]:=a[i]; nb[j]:=i end
end;
if j>0 then begin
    Write('Отрицательные элементы: ');
    for i:=1 to j do Write(b[i],' ');
    Writeln;
    Write('Индексы отрицательных элементов в массиве:');
    for i:=1 to j do Write(nb[i]:3);
    Writeln
end
end.

Результаты тестирования:
Введите количество элементов в массиве (n<51): 9
Вводите элементы массива
3 5 -2 3 -2 0 -6 -8 1
Отрицательные элементы: -2 -2 -6 -8
Индексы отрицательных элементов в массиве: 3 5 7 8

Введите количество элементов в массиве (n<51): 8
Вводите элементы массива
-1 -2 -3 -4 0 -1 2 3
Отрицательные элементы: -1 -2 -3 -4 -1
Индексы отрицательных элементов в массиве: 1 2 3 4 6

4,8(81 оценок)

Ответ:

вика3877

30.05.2022

1.В видео памяти, то есть в оперативной памяти видеокарты – хранятся данные, которые выводятся на экран. Это могут быть как готовые кадры для отображения на экран, так и какие-то их части (полигоны, кусочки картинок и т.п.).

2.Двухцветный - 2 в первой степени следовательно 1 бит
Четырехцветный - 2 во второй степени следовательно два бита
Восьмицветный - 2 в 3 степени следовательно 3 бита

3. Красный, синий и зеленый – это цветовая гамма RGB, которая наиболее популярна на данный момент во многих графических редакторах и других программах. При смешивании:

Красного (Red) и синего (Blue) цвета получается пурпурный (Magenta)

Красного и зеленого (G) – желтый (Yellow)

Синего и зеленого - циановый (Cyan – “цвет морской волны”, ядовито-синий).

Пурпурный, желтый и циановый – основные компоненты цветовой модели CMYK, где K – черный.

4. 2 во второй степени следовательно - четыре цвета

5. 256 это 2 в 8 следовательно у нас есть 8 бит то есть 8 ячеек, нам нужно три цвета( зеленый,синий и красный) остальные можно получить смешивая эти цвета.

Используя цветовую модель RGB в 8-бит цвета кодируются следующим образом :

Первые 2 бита – синий, следующие 3 бита – зеленый и последние 3 бита – красный.

Под синий используются 2 бита, так как считается, что люди менее чувствительны к оттенкам синего.

6.16 это 2 в 4 = 4 бита на пиксель
1 байт =8 бит
1024 байт =1 кбайт
640*480*4=1228800 бит=1200 байт =1 кбайт

4,5(90 оценок)

Это интересно:

Транспорт

04.06.2020

Не дайте окислившимся клеммам аккумулятора испортить ваш автомобиль...

03.03.2020

Как собрать обед для ребенка: советы от нутрициологов...

Компьютеры-и-электроника