Сколько различных сообщений длиной 4 знака можно записать с алфавита
к, е, а, ц, ч, с
если слова должны начинаться с гласной буквы и заканчиваться на согласную?
221
414
Ответы на вопрос:
Объяснение:
//Pascal
var
A: array[1..5] of integer;
i: byte;
MAX: integer;
begin
writeln('Заполнение массива.');
for i := 1 to 5 do
begin
write('A[',i,'] = '); readln(A[i]);
end;
MAX := A[1];
for i := 1 to 5 do
begin
if A[i] > MAX then MAX := A[i];
write(A[i]:4);
end;
writeln;
writeln('Максимальный элемент в массиве = ', MAX);
readln;
end.
Популярно: Информатика
-
Glebbb1524.06.2023 01:17
-
AllRay108.12.2021 20:19
-
MaxAd1321.03.2020 19:57
-
SmilLl28.06.2021 19:26
-
1greg26.04.2023 02:34
-
anjutaboyycova17.02.2023 11:31
-
milankae27.06.2023 10:12
-
denisgolubev117.09.2021 04:09
-
alionka710.02.2020 14:41
-
Printsesska04201718.08.2021 10:29