sahar81305
?>

Светодиодная панель содержит шесть излучающих элементов, каждый из которых может светиться или красным, или желтым, или зелёным цветом. Сколько различных сигналов можно передать с панели (все излучающие элементы должны гореть, порядок цветок имеет значение)?

Информатика

Ответы

olgamalochinska


Светодиодная панель содержит шесть излучающих элементов, каждый из которых может светиться или красн
Наталья
Вот задача для "троечников" с дополнительной оценкой:

program pr1;
uses
crt;

const
arr1 : array[1..12] of integer = (5, 4, -3, 1, 0, -4, 0, 25, -8, 0, -17, -1);

type
arr2 = array of integer;

var
arr : arr2;
n : integer;
i, sot, spl, snu : byte;
ch : char;

begin
write('Хотите использовать заданный по умолчанию массив? (y/n): ');
ch := readkey;
writeln(ch);
sot := 0;
spl := 0;
snu := 0;
if ((ch='y') or (ch='Y')) then begin
{ Используем заданный по умолчанию }
for i:=1 to 12 do begin
if arr1[i] > 0 then inc(spl);
if arr1[i] < 0 then inc(sot);
if arr1[i] = 0 then inc(snu);
write(arr1[i], ' ');
end;
writeln;
end
else begin
{ Создаём и заполняем новый массив }
write('Введите желаемый размер массива: ');
readln(n);
setLength(arr, n);
writeln('Введите элементы массива:');
for i:=0 to high(arr) do
readln(arr[i]);
for i:=0 to high(arr) do begin
if arr[i]>0 then inc(spl);
if arr[i]<0 then inc(sot);
if arr[i]=0 then inc(snu);
write(arr[i], ' ');
end;
writeln;
end;

writeln('Количество отрицательных элементов: ', sot);
writeln('Количество нулевых элементов: ', snu);
writeln('Количество положительных элементов: ', spl);
end.
KseniGum9
Не трудно, но не полностью условие выполнено. Лови решение:

program arrs;
var
a : array[1..26] of integer;
i, min, max : integer;
m1, m2 : byte;

begin
randomize;
for i:=1 to 26 do begin
a[i] := random(29)-15;
write(a[i], ' ');
end;
min := 15;
max := -20;
for i:=1 to 26 do begin
if a[i] < min then begin
min:=a[i];
m1 := i;
end;
if a[i] > max then begin
max:=a[i];
m2 := i;
end;
end;
writeln;
writeln('Минимальный элемент в ячейке ', m1, ' равен ', min);
writeln('Максимальный элемент в ячейке ', m2, ' равен ', max);
end.

тестовый прогон:

0 2 -1 2 -9 -13 -9 -5 0 -14 11 6 8 -11 13 3 -15 -6 -15 -14 -3 13 9 7 3 -4
Минимальный элемент в ячейке 17 равен -15
Максимальный элемент в ячейке 15 равен 13

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Светодиодная панель содержит шесть излучающих элементов, каждый из которых может светиться или красным, или желтым, или зелёным цветом. Сколько различных сигналов можно передать с панели (все излучающие элементы должны гореть, порядок цветок имеет значение)?
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Inforealto
tumanowivan2015509
akinin95
maxkuskov2485
Aleksandr-Andrei
dream2366
Dr-motoshop
igschuschkov6211
Яковчук1911
aluka
Татьяна1252
ynikolaev2657
Алексеевна
artemkolchanov24
РостиславовичЮлия1147