1)
var arr: array [1..12] of integer;
begin
for var i := 1 to 12 do
arr[i] := random(-48, -83);
writeln(arr[3] + ' ' + arr[7] + ' ' + arr[11]);
end.
2)
var arr: array [1..9] of double;
begin
for var i := 1 to 9 do
begin
arr[i] := random(15, 40);
write(arr[i] + ' ');
end;
writeln();
var max := arr[1];
for var i := 2 to 9 do
begin
if max < arr[i] then
max := arr[i];
end;
writeln('Max: ' + max);
end.
3)
var arr: array [1..15] of integer;
begin
for var i := 1 to 9 do
begin
arr[i] := random(-10, 35);
write(arr[i] + ' ');
end;
writeln();
write('Нечетные: ');
for var i := 1 to 9 do
begin
if not arr[i] mod 2 = 0 then
write(arr[i] + ' ');
end;
end.
ответ: Всего из букв С, Р, Е, Д, А можно составить 66 комбинаций
Объяснение:
Гласная + согласная + согласная - 12 вариантов:
ЕСР, ЕСД, ЕРС, ЕДС, ЕРД, ЕДР, АСР, АСД, АРС, АДС, АРД, АДР.
Гласная + согласная + гласная - 12 вариантов:
ЕСЕ, ЕРЕ, ЕДЕ, АСА, АРС, АДА, ЕСА, ЕРА, ЕДА, АСЕ, АРЕ, АДЕ.
Согласная + согласная + согласная - 12 вариантов:
СРС, СДС, РСР, РДР, ДСД, ДРД, СРД, СДР, РСД, РДС, ДСР, ДРС.
Согласная + гласная + согласная - 18 вариантов:
СЕС, САС, РЕР, РАР, ДЕД, ДАД, СЕР, СЕД, САР, САД, РЕС, РЕД, РАС, РАС, ДЕС, ДЕР, ДАС, ДАР.
Согласная + согласная + гласная - 12 вариантов:
СРЕ, СРА, СДЕ, СДА, РСЕ, РДЕ, РСА, РДА, ДСЕ, ДРЕ, ДСА, ДРА.
Подсчитаем общее количество вариантов:
12 + 12 + 12 + 18 + 12 = 66
ИЛИ
Гласная + согласная + согласная:
2 * 3 * 2 = 12
Гласная + согласная + гласная:
2 * 3 * 2 = 12
Согласная + согласная + согласная:
3 * 2 * 2 = 12
Согласная + гласная + согласная:
3 * 2 * 3 = 18
Согласная + согласная + гласная:
3 * 2 * 2 = 12
Подсчитаем общее количество вариантов:
12 + 12 + 12 + 18 + 12 = 66