.cdr - не подходит под формат для сохранения растровых изображений
===== PascalABC.NET =====
function sogl(c: char) :=
not (c.ToUpper in ('АЕЁИОУЫЭЮЯ'));
// проверка функции
begin
var s := 'ТестируемРусскийАлфавит';
foreach var c in s do
Print(sogl(c));
end.
На самом деле все это будет правильно работать лишь если функции давать исключительно русские буквы.
A = list()
k = 0
for i in range(5):
A.append([])
for j in range(5):
A[i].append(k)
k+=1
for i in range(5):
for j in range(5):
print(A[i][j], end = " ")
print()
print("Последняя удаленная строка: ", A.pop())
for i in range(len(A)):
for j in range(len(A[i])):a
print(A[i][j], end = " ")
print()
Ответ:
Если A = 4, то ответом будет 1089
Объяснение: