Какая из представленных ниже форм эквивалентна подпрограмме на языке Pascal Function convert (l: list): integer; // L- списокBegin for i:=0 to endoflist do //endoflist – количество элементов списка – 1. begin if List(L[i] ) then convert(L[i]) else L[i]:=L[i]+5;//если элемент является списком то вызываем для него функцию convert; end;End; :
(Отметьте один правильный вариант ответа.)
Варианты ответа
(defun convert(L) (cond ((Null L) Nil) (T (cond ((Atom (car L)) (cons (+ (car L) 5) (convert (cdr L))) ) (T (cons (convert (car L)) (convert (cdr L)))) ) ) ) )(Верный ответ)
(defun convert(L) (prog () (cond ((Null L) Nil) (T (cond ((Atom (car L)) (cons (+ (car L) 5) (convert (cdr L))) ) (T (cons (convert (car L)) (convert (cdr L)))) ) ) ) ) )
(prog convert (L)(cond ((Null L) Nil) (T (cond ((Atom (car L)) (cons (+ (car L) 5) (convert (cdr L))) ) (T (cons (convert (car L)) (convert (cdr L)))) ) ) ) )