Одинаковы ли все элементы матрицы или нет - VB
Формулировка задачи:
kak napisatj kod shtobi programma opredeljala matrici vse elementi odinakovi ili net?
Решение задачи: «Одинаковы ли все элементы матрицы или нет»
textual
Листинг программы
- function MatricaOdinakova(matr) as boolean
- dim m,m1
- for each m in matr
- if not isempty(m1)then
- if m<>m1 then exit function
- endif
- m1=m
- next
- MatricaOdinakova=true
- end function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
