Ответ:
var a = -2;
var b = 2;
var c = 3;
var mas = [a, b, c]; //или mas.push(a); mas.push(b); mas.push(c);
for(var i = 0; i < mas.length; i++)
{
if(mas[i] < 0)
{
Math.pow(mas[i], 2); //или mas[i]*mas[i];
//Вывод квадратов отрицательных чисел
}
else if(mas[i] > 0)
{
Math.pow(mas[i], 3); //или mas[i]*mas[i]*mas[i];
//Вывод кубов положительных чисел
}
}
Объяснение:
Массив использован для удобства, универсальности и компактности кода.
Var key:integer;
begin
readln(key);
case key of
9583,1747:writeln('A, B, C');
3331,7922:writeln('B, C');
9455,8997:writeln('C');
end;
<span>end.</span>
Programm p1;
var i,s:integer;
arr1:array [1..8] of integer;
begin
for i:=1 to 8 do
begin
writeln ('Введите элемент массива ',i);
readln(arr1[i]);
end;
s:=0;
for i:=1 to 8 do
begin<span>
if (arr1[i] mod 2 <> 0) and (arr1[i]>0) then s:=s+arr1[i];</span>
end;
writeln('Сумма нечетных положительных элементов равно: ',s);
<span>end.</span>
<span>* Так как нужно найти количество последовательностей, содержащих ровно 3 буквы А, то отбрасываем А при подсчете:
3 - 1 = 2.
* Остается две буквы: Б и В, которые могут дать следующие последовательности:
ББ
БВ
ВБ
ВВ
Всего 4 последовательности, теперь составим список количества возможных последовательностей, в котором ровном 3 буквы А:
ААА**
АА**А
АА*А*
*</span>АА*<span>А
А**АА
А*А*А
А*АА*
**ААА
*А*АА
*ААА*
* Всего 10 возможных вариантов: 10 * 4 = 40 различных последовательностей, содержащих ровно 3 буквы А.</span>
Я то же с этим сейчас работаю тестом и поэтому ответ C) я точно знаю!