DIM a(15),b(15),c(15)
FOR i=1 TO 15
INPUT"vv. el. massiva a",a(i)
NEXT
FOR i=1 TO 15
INPUT"vv. el. massiva b",b(i)
NEXT
FOR i=1 TO 15
c(i)=a(i)+b(i)
NEXT
max=c(1)
FOR i=1 TO 15
IF c(i)>max THEN max=c(i)
NEXT
PRINT "massiv A: ";
FOR i=1 TO 15
PRINT a(i);" ";
NEXT
PRINT
PRINT "massiv B: ";
FOR i=1 TO 15
PRINT b(i);" ";
NEXT
PRINT
PRINT "massiv c: ";
FOR i=1 TO 15
PRINT c(i);" ";
NEXT
PRINT
PRINT max